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Il QBasic è il potente e moderno linguaggio di programmazione che accom- 
pagna il sistema operativo MS-DOS. Imparare a programmare con QBasic è 
facile e piacevole grazie a un’interfaccia utente “amichevole”, a efficaci stru- 
menti di editing e debug e ottime funzioni di aiuto in linea. 


Sedi 
ro 


Anche se non avete alcuna esperienza di programmazione, QBasic è la strada nil Michael Halvorson 
migliore per impararne i concetti fondamentali e iniziare a scrivere i vostri li David Rygmyr 
primi programmi in Basic. Il libro comprende: 


Introduzione pratica e tutorial. Questa parte del volume fornisce una chiara a nia ; Iniziare a programmare con il nuovo 
spiegazione dei concetti che stanno alla base del progetto di un programma; ‘784 o OBasic dell’MS-DOS 

istruzioni graduali per scrivere programmi in Basic, consigli sulle operazioni i ii RI SI ORENTIO 

di debug e una guida di rapida consultazione per convertire i programmi da eGo Imparare i principi fondamentali 

GW- Basic in QBasic di MS-DOS. equi e le tecniche avanzate di programmazione 


Programmi esempio. Moltissimi programmi di utilità pratica illustrano le ti‘ 7 Scrivere programmi strutturati in Basic 
corrette tecniche di programmazione. | fi | 


Domande ed esercizi. Domande ed esercizi di ripasso sono stati apposita- 
mente pensati per migliorare e rendere più solido l'apprendimento di QBasic. 
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PERCHÉ LA GENTE USA I COMPUTER? 


Un computer non è altro che uno strumento al vostro servizio, in grado di aiu- 
tarvi a svolgere certi compiti in modo veloce ed efficiente. Il fatto stesso che 
abbiate comprato questo libro dimostra che pensate che un computer vi possa 
essere di aiuto, ma vi potreste chiedere a che cosa possa servirvi scrivere pro- 
grammi. 


Perché è utile imparare a programmare? 


Dopo tutto oggi si possono trovare sul mercato migliaia di programmi, da 
quelli che vi aiutano a preparare la dichiarazione delle tasse a quelli che vi 
sfidano attraverso complessi giochi di avventura. E, proprio a causa della 
grande varietà di software in commercio, si potrebbe credere che il mercato 
sia già saturo: che esista, cioè, un programma per ogni esigenza. 

Ma quest'idea è sbagliata. 


La programmazione come strumento per risolvere problemi 


AI di là delle generalizzazioni, i programmatori professionali hanno general- 
mente un occhio per il mercato. Per la maggior parte essi progettano pro- 
grammi in grado di rispondere alle più ampie esigenze del mercato — infatti, 
da un punto di vista economico non avrebbe senso scrivere un programma 
per un ristretto gruppo di possibili acquirenti. Ciò significa che più specifiche 
sono le vostre esigenze, più improbabile è che troviate sul mercato un soft- 
ware già pronto in grado di soddisfarle. 

Imparando a programmare sarete in grado di creare programmi persona- 
lizzati, in grado di soddisfare 1 vostri bisogni. 


La programmazione come strumento di apprendimento 


Un'altra ragione per imparare a programmare sta nel fatto che questo proces- 
so aiuta ad apprendere il funzionamento interno dei computer: si è in grado, 
così, di apprezzare la logica che sta alla base dei risultati che appaiono sullo 
schermo o in fase di stampa. Chi impara 1 fondamenti della programmazione 
è in grado di capire che cosa succede “dietro le scene”, in modo molto simile 
a un architetto che osservando l’esterno di un palazzo può capire l’organizza- 
zione delle travi di acciaio, delle tubature e delle altre strutture di supporto. 
‘ Questa familiarità consente di capire le vere potenzialità di un computer; per 
questa ragione l’insegnamento della programmazione è alla base di qualsiasi 
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corso di studi nel campo dell’informatica. Inoltre, acquisendo una conoscenza 
di fondo si è in grado di parlare il linguaggio dei professionisti del settore, at- 
traverso l’uso di termini e concetti appropriati. 


La programmazione come divertimento 


L’ultima ragione per imparare a scrivere programmi per conto proprio è che 
programmare può essere molto divertente, sia per i principianti sia per i pro- 
grammatori esperti. 

Ci sono, dunque, molte buone ragioni per imparare a programmare. Per 
cominciare, cerchiamo di imparare un po’ di terminologia; per esempio, che 
cos’è un programma? 
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CHE COS’È UN PROGRAMMA 


Per poter funzionare in modo utile un computer dev'essere completo di due 
componenti: hardware e software. 


Bi Il concetto di hardware definisce le parti fisiche del computer, quelle che 
si possono vedere e toccare come la tastiera o lo schermo. 


Bi Ilconcetto di software è un po’ più elusivo: è l’intelligenza che controlla 
l’hardware, permettendo l’effettivo impiego del computer. 


È impossibile usare l’uno senza l’altro; l’hardware senza il software è co- 
me un giradischi senza dischi. 

Un programma per computer viene chiamato software: questo non è altro 
che un insieme di istruzioni che agiscono sul computer facendogli eseguire 
un certo compito, per esempio un calcolo matematico o un’elaborazione di 
testo. Un programma può essere composto da una sola istruzione, ma può 
contenerne anche centinaia o migliaia. 


- Hc cinema e i n fun ‘spesso .._. come luo dei o 

‘computer riduca l’occupazione, renda la vita più difficile e sia sul pun- ; - 
to di dominare il mondo; insomma non sembra proprio l’i immagine di 
_. strumento da Li Lui la casa Lo il lavoro, tanto meno da usare . 

_ No onostante la cattiva i... i uu computer s sono i _- 
_ - nitrati in molti luoghi di lavoro e in molte case, rendendo la vita più — 
. semplice - produttiva grazie alla capacità di automatizzare l’ esecuzio- 
| ne di molte attività. L’. ‘opinione della gente su ‘queste strane macchine. . 
n | elettroniche sta finalmente cambiando; quelle che una volta erano. ici 
chine in grado di produrre solamente ‘una gran quantità di incomprensi- 
| bili schede perforate. e che. ‘occupavano un bel po” di spazio in uno 
i san sono Oggi1 macchine che it poco iu. su i una e 


- - n e diri ricerca un sui dau usare e sempre più potenti, - 
| no finalmente diventati i strumenti utili che fino a abedna anni fa si 


| potevano so soltanto sognare. __ 000 
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COME SI SCRIVE UN PROGRAMMA 
PER COMPUTER? 


I primi importanti passi nel processo di programmazione sono la preparazio- 
ne e l’organizzazione. Due domande possono aiutare a organizzarsi: 


1. Checosasi vuole che il programma faccia? 
2. Quali passi deve compiere il programma per eseguire il suo compito? 


L’insieme dei passi viene detto algoritmo. Un algoritmo non è un pro- 
gramma in se stesso, ma soltanto una raccolta di note ordinate che descrivono 
ciò che il programma farà in corrispondenza a ogni passo. Per fare un esem- 
pio, quando si usa una ricetta si usa in realtà un algoritmo: cucinare una torta 
implica infatti un processo da seguire passo passo se si vuole ottenere un ri- 
sultato utile (e saporito!). Dal momento che un algoritmo è uno strumento per 
la risoluzione di problemi che viene progettato per aiutare in fase di scrittura 
del programma, non esiste un modo giusto o sbagliato da seguire nella sua 
creazione. Alcuni programmatori scrivono un algoritmo sotto forma di elenco 
ordinato di azioni, altri lo disegnano graficamente (grafico a flusso) e altri an- 
cora organizzano semplicemente le diverse azioni a mente. Qualunque sia la 
vostra scelta, è importante che cominciate a pensare al vostro programma in 
termini generali molto prima di sedervi davanti al computer. 


Il linguaggio di programmazione Basic 


Una delle ragioni per progettare un programma e risolvere i problemi in anti- 
cipo sta nel fatto che i computer non possono riconoscere molte parole ed è 
necessario dar loro istruzioni in un linguaggio che siano in grado di capire. 

Il Basic è uno dei molti linguaggi per personal computer disponibili. Co- 
me per tutte le lingue anche il linguaggio per computer ha un suo “vocabola- 
rio” e un suo insieme di regole. Inoltre, ogni linguaggio presenta dei punti 
forti e dei punti deboli: alcuni sono più efficienti nell’eseguire certi compiti, 
altri sono più semplici da usare. Il Basic è un eccellente linguaggio di pro- 
grammazione perché è potente, flessibile e soprattutto facile da usare. 

Imparare a “parlare” il Basic o qualsiasi altro linguaggio di program- 
mazione è molto simile a imparare a parlare una lingua straniera; il Basic ha 
un suo vocabolario e un insieme di regole da seguire nell’uso del vocabolario 
stesso. Fortunatamente il vocabolario del Basic consiste di meno di 200 paro- 
le (dette parole chiave) e le regole (dette regole di sintassi) per l’uso delle pa- 
role chiave sono relativamente semplici. 
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. Azione A 


. Azione B Î | Aazonea | 


1. Azione A 

2. Azione B 

3. Funziona? 
— se no: Azione B 
— se sì: Azione C 


. Funziona? 
— se no: Azione B |. 
— se sì: Azione C I OOAZIONEBO © B 


FUNZIONA? 


AZIONE C 


Figura 1-1. Ci sono vari modi per creare un algoritmo. 


MS-DOS QBasic Interpreter 


Prima di poter cominciare a digitare istruzioni in Basic il computer dev’esse- 
re dotato di un software in grado di capirle. Questo è il compito del program- 
ma MS-DOS QBasic Interpreter (QBasic) di cui è dotata la versione 5 di 
MS-DOS: esso legge le istruzioni QBasic e le traduce in una forma che il 
computer è in grado di usare. La parola ‘‘interpreter” è particolarmente appro- 
priata in quanto MS-DOS QBasic Interpreter interpreta letteralmente ogni 
enunciato digitato, controllando che non ci siano errori nelle istruzioni inseri- 
te, che le parole chiave non siano state usate in modo sbagliato e che le regole 
di sintassi siano state rispettate. 

QBasic fornisce anche un ambiente di programmazione nel quale lavora- 
re. Esso è perciò un pacchetto completo che permette di scrivere programmi e 
di eseguirli immediatamente; con QBasic è possibile salvare i programmi 
creati su disco, stamparne le istruzioni e disporre di una guida on-line quando 
necessario. L’ambiente di programmazione QBasic dispone anche di molte 
funzionalità di elaborazione testo che semplificano la scrittura e la modifica 
dei programmi. 
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> > QBasic è è un n moderno i insieme e dell l'originale linguaggio BASI, creato Hi . 


COME IMPARERÒ QBASIC 
CON QUESTO LIBRO? 


Oltre a fornire un'introduzione sul linguaggio di programmazione QBasic, 
questo libro vi permette di mettere subito in pratica le conoscenze acquisite. 
Di pari passo con l’apprendimento del linguaggio scriverete programmi che 
mostrano dei caratteri sullo schermo, che leggono caratteri digitati sulla ta- 
stiera, che lavorano con parole e numeri e che conservano informazioni su un 
disco, recuperandole poi nuovamente. Imparerete anche a creare programmi 
che usano grafica e suono e, una volta completato il libro, sarete in grado di 
creare degli utili programmi con QBasic, il che vi permetterà di usare in mo- 
do ancor più efficiente il vostro computer. 


NOTA: Ogni capitolo di questo libro (a partire dal pros- 
simo) termina con domande ed esercizi di ripasso. Cer- 
cate di completarli dal momento che rappresentano una 
buona opportunità per rivedere quel che avete imparato e assicu- 
rarvi di aver capito ciò che è stato spiegato prima di proseguire. 
L’ Appendice E contiene le risposte alle domande e i risultati degli 
esercizi. 
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QBASIC COME PARTE DI MS-DOS 5 


QBasic viene distribuito gratuitamente con la versione 5 di MS-DOS o col 
pacchetto di aggiornamento. Se si dispone di questi prodotti (o di quelli com- 
patibili distribuiti dai produttori di personal computer) si dispone anche di 
QBasic. Prima di cominciare, assicuratevi di aver installato la versione 5 di 
MS-DOS sul computer (se disponete di un disco fisso) o di avere dei dischetti 
(se disponete di un sistema con due unità a dischi flessibili e senza disco fis- 
so). Il prossimo capitolo fornisce un’introduzione dettagliata per avviare 
QBasic e scrivere il vostro primo programma! 


NOTA: Diamo per scontato che il lettore abbia una co- 
noscenza almeno elementare del sistema operativo MS- 
DOS (formattazione dei dischi, cambiamento delle 
directory, impostazione di percorsi e così via). Se avete bisogno di 
rinfrescare alcuni concetti basilari, potete fare riferimento alla do- 
cumentazione sul DOS che vi è stata fornita col vostro computer. 


CAPITOLO 2 


PISELLI III RSA IAII CEROSIOEP ERA DIRONSINS MRS PELINE SIAIII 


Elementi base 
di QBasic 
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Dopo aver visto alcuni concetti introduttivi iniziamo subito a imparare a pro- 
grammare. 


AVVIAMENTO DI QBASIC 


Per cominciare a programmare è necessario avviare QBasic; l’avviamento 
può avvenire da disco fisso o da disco flessibile a seconda del sistema dispo- 
nibile. 


NOTA: Nei successivi capitoli del libro il testo da digita- 
re viene indicato in neretto. 


Avviamento di QBasic da disco fisso 


Se la versione 5 di MS-DOS è installata su disco fisso, il programma e i file 
di supporto di QBasic dovrebbero trovarsi nella directory DOS del drive C. 
Per avviare QBasic basta digitare i seguenti comandi e premere Invio: 

Ci 

cd \dos 

qbasic 


NOTA: Per poter avviare QBasic da una qualsiasi di- 
rectory sul disco fisso bisogna aggiungere la directory 
C: \DOS alla variabile PATH contenuta nel file AU- 
TOEXEC.BAT. 


Avviamento di QBasic da disco flessibile 


Se il vostro computer è dotato di due drive per dischi flessibili e non dispone- 
te di un disco fisso potete avviare QBasic nel modo seguente: 


1. Inserite il disco di avviamento di MS-DOS 5 nel drive A. 


2. Inserite il disco QBasic 1 nel drive B. 

3. Riavviate il computer premendo Ctrl, Alt e Canc simultaneamente. 

4. AI prompt del sistema digitate la seguente riga di comando PATH e pre- 
mete Invio: 
path a:;b: 
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5. Avviate QBasic digitando la seguente riga di comando e premete Invio: 


qbasic 


La luce del drive B si accenderà e QBasic apparirà sullo schermo. Quando la 
luce si spegne, rimuovete il disco di avviamento di MS-DOS 5 dal drive A e 
inseritevi il disco QBasic 2. Eseguite QBasic da entrambi i dischi fino a quan- 
do decidete di uscire dal programma: per far ciò rimuovete il disco QBasic 2 
dal drive A e inseritevi il disco di avviamento di MS-DOS 5. 


NOTA: Con la crescita nella dimensione dei programmi 
diventa sempre più difficile eseguirli da un sistema non 
dotato di disco fisso. Il maggior problema con QBasic 
sarà quello di esaurire facilmente lo spazio disponibile su disco e di 
dover cambiare dischetti molto spesso. Perciò, se usate il computer 
molto spesso può essere consigliabile comperare un disco fisso o un 
computer che ne sia dotato. 


LO SCHERMO DI QBASIC 


Lo schermo di QBasic, al momento dell’avviamento, appare nel modo se- 
guente: 


File Modifica Visualizza Cerca Esegui Debug Opzioni 
Senza titolo 


Benvenuti in MS-DOS QBasic 


Copuright (C) Microsoft Corporation, 1987-1991. 
Tutti i diritti riservati. 


Premere INVIO per consultare la Guida rapidafi 


i <Premere ESC per cancellare questa finestra> | 


Immediato 


Fi=Guida Invio-Esegui Esc=Annulla Tab=Campo seg.  FrecciaVoce seg. 
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Questo messaggio di “benvenuto” appare ogni volta che QBasic viene avvia- 
to. Lo schermo offre due opzioni: 


i PremendoInviosi può vedere il sistema di guida on line. 
Esc cancellail messaggio dallo schermo e avvia il programma. 
Esercizio: Pulire lo schermo per cominciare a programmare 


Dal momento che cominceremo a programmare già in questo capitolo, pre- 
mete Esc per cancellare il messaggio dallo schermo. 


L’ambiente QBasic 


Cominciamo col descrivere i vari elementi di cui si compone lo schermo di 
QBasic, elementi che vi aiuteranno nella creazione dei programmi e nell’ela- 
borazione dei testi. 


RIGA DEI MENU 


File Modifica Visualizza Cerca Esegui Debug Opzioni 
Senza titolo 


CURSORE CONTROLLO ZOOM 


FINESTRA DI — 


_ DIGITAZIONE 


FINESTRA IMMEDIATO 
<Maius+F1=Guida%<F6=Finestra)<F2=Subs)<F5-Esegui)<F8=Passo> || 20001 :002 


Lai 


BARRA DI RIFERIMENTO 


POSIZIONE RIGA E 
COLONNA DEL CURSORE 
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Il cursore 


Il trattino sottolineato lampeggiante che vedete nell’angolo superiore sinistro 
dello schermo è il cursore; esso indica il punto in cui apparirà il carattere di- 
gitato sullo schermo. 


Il puntatore del mouse 


Se avete installato un mouse sul vostro computer, un puntatore rettangolare 
appare nell’angolo superiore sinistro dello schermo; questo vi consente di 
spostarvi velocemente all’interno del programma e di selezionare facilmente i 
comandi dai menu. | 


Le coordinate di riga e colonna 


Nell’angolo in basso a destra dello schermo ci sono due numeri separati da 
due punti. Questi valori indicano la posizione corrente del cursore: il primo fa 
riferimento alla riga in cui esso si trova, il secondo (quello dopo i due punti) 
alla colonna. Nella figura 2-1 1 numeri indicano che il cursore si trova in cor- 
rispondenza della prima riga e della prima colonna. 


POSIZIONE DI COLONNA 
DEL CURSORE 


POSIZIONE DI e i | 


DEL CURSORE 


Figura 2-1. Coordinate di riga e colonna. 


Esercizio: Cambiare le coordinate di colonna 


1. Premete il tasto di direzione destro più volte e osservate come cambia la 
coordinata della colonna. 


2. Premeteil tasto di direzione sinistro finché il cursore torna nella posizio- 
ne corrispondente alla prima colonna (più avanti, quando comincerete a 
scrivere dei programmi, avrete la possibilità di esercitarvi anche sul cam- 
biamento delle coordinate di riga con 1 tasti di direzione Su e Giù). 
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La barra e i nomi dei menu 


In cima allo schermo si può vedere la barra dei menu, che contiene i nomi di 
tutti i menu a scorrimento di QBasic. 


La Finestra di digitazione e la Finestra Immediato 


QBasic fornisce inizialmente due finestre nelle quali lavorare: 


s La finestra superiore — in cui scrivere e lavorare sui programmi di pro- 
pria creazione — è detta Finestra di digitazione. 


ss La finestra inferiore — in cui provare le istruzioni di programmazione 
prima di inserirle effettivamente nel programma — è detta Finestra Im- 
mediato. 


È possibile lavorare, di volta in volta, in una sola di queste due finestre e il 
passaggio dall’una all’altra è molto facile. Viene detta finestra attiva quella in 
cui si sta lavorando in quel momento; essa può essere facilmente identificata: 


sa Osservando il cursore lampeggiante, che si trova sempre nella finestra at- 
tiva. 


3 Osservando il titolo che appare in cima alla finestra dal momento che 
quello della finestra attiva è evidenziato. 


Si noti che il nome della Finestra di digitazione resta invariato (Senza ti- 
tolo) fino a quando si attribuisce un nome al programma e lo si salva su disco. 


La barra di riferimento 


Alla base dello schermo si trova la barra di riferimento, che contiene una lista 
di tasti di controllo che si possono usare nella finestra attiva. Questa lista 
cambia ogni volta che si seleziona una nuova finestra attiva. 


Esercizio: Cambiare le finestre con un comando della barra di riferimento. 


Si noti che il tasto funzione F6 è il tasto Finestra, che viene usato per passare 
dall’una all’altra (se si dispone di un mouse basta invece posizionare il punta- 
tore in un qualunque punto della finestra da attivare e fare clic). Provate a 
premere F6 e osservate ciò che succede. 

Come potete vedere dalla figura 2-2, il cursore lampeggiante si trova ora 
nella Finestra Immediato. Le barre di scorrimento orizzontali e verticali om- 
breggiate sono scomparse dalla Finestra di digitazione, la parola Senza titolo 
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File Modifica Visualizza Cerca Esegui Debug Opzioni 
senza titolo 


CURSORE 


Immediato 


<Maius+F1=Guida><F6=Finestra}<Imvio=Esegui riga» — 


Figura 2-2. Attivazione della Finestra Immediato. 


in cima a questa finestra non è più evidenziata, mentre lo è la parola Imme- 
diato in cima a questa finestra. 

Questi cambiamenti indicano che la Finestra Immediato è diventata la fi- 
nestra attiva; infatti, se provate a digitare dei caratteri sulla tastiera questi ap- 
pariranno nella Finestra Immediato invece che nella Finestra di digitazione. 
Si noti che il titolo delle Finestra Immediato non cambia mai, a differenza di 
quello della Finestra di digitazione. 

Si noti anche che nella barra di riferimento compare un diverso gruppo di 
tasti di controllo (quelli appunto della Finestra Immediato). Per il momento 
non useremo la Finestra Immediato e perciò potete premere F6 per rendere la 
Finestra di digitazione nuovamente attiva. 


Il controllo zoom 


È possibile far scomparire dallo schermo la Finestra Immediato. Nell’angolo 
superiore destro dello schermo, appena sotto il menu Guida (02), si trova un 
rettangolo verticale contenente un freccia indirizzata verso l’alto detta con- 
trollo zoom. Questo controllo produce l’espansione della Finestra di digita- 
zione che viene così a coprire la Finestra Immediato. 
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Una volta usato questo controllo, il carattere si trasforma in una freccia a IL VOSTRO PRIMO PROGRAMMA 
due punte, per indicare che la Finestra di digitazione è stata espansa al massi- Dopo aver brevemente introdotto QBasic cercheremo ora di scrivere un pri- 
mo. Il controllo zoom può essere usato col mouse o con la tastiera: mo, semplice programma in QBasic. Scrivere questo programma è molto 
sm Sesiusail mouse basta fare clic nel rettangolo sotto il menu Guida (?). semplice: basterà digitare le righe esattamente come viene mostrato negli 


Per riportare la Finestra di digitazione alla dimensione originale basta fa- esempi seguenti e premere Invio alla fine di ogni riga. 
re clic nuovamente nella stessa area. 


Esercizio: Scrivere il vostro primo programma 
sm Sesiusalatastiera bisogna tenere premuto il tasto Ctrl e premere il tasto 


F10. Per riportare la Finestra di digitazione alla dimensione originale ba- 1. Portate il cursore in corrispondenza della prima riga e della prima colon- 
sta premere di nuovo Ctrl+F10. na e digitate la riga seguente, esattamente come appare sotto — spazi, 
virgolette e così via: 


Esercizio: Espansione della Finestra di digitazione con il controllo zoom 


Lea 


1. Usate il mouse o la tastiera per espandere la Finestra di digitazione con il print "Marco, sono preoccupato per Maria." 


controllo zoom; lo schermo apparirà in questo modo: ; 2. Controllate la riga attentamente e assicuratevi di non aver commesso er- 


rori di battitura. In questo caso usate il tasto Backspace per correggere 


l’errore e poi completate la riga come nell’esempio. 
File Modifica Visualizza Cerca Esegui Debug Opzioni 


Senza titolo 3. Quando siete certi che non ci sia alcun errore premete Invio; a questo 


punto lo schermo apparirà nel modo seguente: 


File Modifica Visualizza Cerca Esegui Debug Opzioni 
Senza titolo 
PRINT "Marco, sono preoccupato per Maria." 


<Maius+Fi=Guida><F6=Fines 


2. Orariportate la Finestra di digitazione alla sua dimensione originale per 
rendere nuovamente visibile la Finestra Immediato. 


_<Maius+Fi-Guida><F6-FinestraY<F2=Subs><FS=Esegui}<F8=Passo> _ Banez : BI 
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Si noti che la parola PRINT è in maiuscolo perché essa rappresenta una 
parola chiave di QBasic — fa parte cioè del “vocabolario” di QBasic. Le pa- 
role chiave vengono sempre trasformate in maiuscole per distinguerle più fa- 


cilmente dalle altre. se 
La riga che abbiamo appena digitato, per quanto breve, costituisce un 
completo programma in QBasic. 


Eseguire un programma 

Per eseguire un programma si usa il comando Avvia dal menu Esegui; questo 
comando dice a QBasic di eseguire le istruzioni contenute nella Finestra di 
digitazione. 


Esercizio: Eseguire il vostro primo programma 


Per eseguire il programma appena scritto premete Alt per attivare la barra dei 
menu, scegliete Esegui e poi il comando Avvia (per una rassegna sull’uso 
della tastiera o del mouse nella selezione dei comandi di menu si veda l’Ap- 
pendice A, “Uso dei menu e delle opzioni di QBasic’’). A questo punto lo 
schermo dovrebbe apparire così: 


C:N <‘Mer 309/10/1991> >qbasic 
Marco, sono preoccupato per Maria. 


Premere un tasto per continuare 
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Lo schermo di output 


QBasic mostra l’output del programma, cioè il risultato finale delle istruzioni 
digitate, nello schermo di “output”. Questo schermo viene attivato automa- 
ticamente quando si esegue un programma e ciò per evitare che il risultato del 
programma sovrascriva le istruzioni (dette anche codice) contenute nella Fi- 
nestra di digitazione. Lo schermo di output mostra qualsiasi programma ese- 
guito in precedenza, a meno che venga ripulito. Questa è la ragione per cui, 
nell’illustrazione precedente, potete vedere la riga di comando di DOS usata 
per eseguire QBasic. Il messaggio alla base dello schermo di output, “Preme- 
re un tasto per continuare”, compare quando l’esecuzione del programma è 
terminata. 


Esercizio: Rattivare la Finestra di digitazione 


Premete un tasto qualsiasi per riattivare la Finestra di digitazione. Congratu- 
lazioni! Avete appena scritto ed eseguito il vostro primo programma! 


Cambiare un programma 


Abbiamo appena visto una delle parole chiave di QBasic, PRINT, la cui fun- 
zione è di visualizzare sullo schermo le informazioni inserite nel programma. 
Vedremo ora un’altra parola chiave, detta CLS (CLear Screen, Pulisci Scher- 
mo), che permette di cancellare completamente il contenuto dello schermo di 
output. Proveremo ora ad aggiungere questa istruzione al programma appena 
scritto, per vedere come modificare un programma esistente. 


Organizzare in modo ordinato le istruzioni di QBasic 


Prima di aggiungere CLS al programma bisogna riflettere sull’ordine in cui si 
vuole che queste vengano eseguite dal programma. Si tenga presente che ne- 
gli esempi di questo libro ogni istruzione si trova su una riga diversa e che, 
quando si esegue un programma, QBasic comincia dalla prima riga ed esegue 
le istruzioni una ad una, nell’ordine in cui sono state inserite, fino al termine 
della lista. Il primo passo è dunque quello di decidere dove inserire l’istruzio- 
ne CLS nel programma. 


Esercizio: Aggiungere un’istruzione al programma 


In questo momento il cursore si trova in corrispondenza alla lettera P dell’i- 
struzione PRINT. 
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1. Digitatelariga seguente e premete Invio. 
CLS 


Lo schermo dovrebbe ora apparire in questo modo: 


File Modifica Visualizza Cerca Esegui Debug Opzioni 
Senza titolo 
PRINT "Marco; sono preoccupato per Maria." 
ICLE 


Premere un tasto per continuare 


(Come visto nell’esempio precedente QBasic trasforma l’istruzione CLS 
in lettere maiuscole in quanto si tratta di una parola chiave.) 


questi strumenti, ma se volete informazioni più dettagliate potete fare riferi- 


2. Eseguite di nuovo il programma: scegliete Avvia dal menu Esegui. Se fa- mento all’ Appendice A, “Uso dei menu e delle opzioni di QBasic”. 
te attenzione potrete vedere il messaggio “Marco, sono preoccupato per 


Maria.” lampeggiare brevemente sullo schermo e poi scomparire per la- i i i 
sciare lo schermo di output come appare nella figura successiva. Non ha I comandi Taglia, Copia e Incolla 
perciò molto senso usare un'istruzione PRINT se questa viene immedia- 
tamente seguita da CLS; questo ci fa capire quanto importante sia stabili- 
re un corretto ordine per le istruzioni contenute nel programma. 
L’istruzione CLS va posta prima di PRINT se si vuole che il programma 
si comporti nel modo desiderato. 


I comandi Taglia, Copia e Incolla rappresentano un efficiente insieme di stru- 
menti per la modifica dei programmi. Consentono infatti di risparmiare tem- 
po e di ridurre le possibilità di commettere errori di battitura. 


Esercizio: Modifica di un programma coi comandi Taglia e Incolla 
3. Premete un tasto qualsiasi per riattivare la Finestra di digitazione. le 


Abbiamo visto nell’esempio precedente che l’istruzione PRINT dev'essere 
spostata dopo l’istruzione CLS. Per far ciò si usano i comandi Taglia e Incol- 
Modificare un programma la del menu Modifica. 


Il processo di cambiamento di un programma viene anche detto di modifica. 


Modificare un programma implica aggiungere o cancellare caratteri e sposta- 1. Spostate il cursore sotto la lettera P dell’istruzione PRINT; tenete premu- 


re righe di istruzioni da una parte all’altra to il tasto Maiusc e premete il tasto di direzione Giù per selezionare l’in- 
QBasic fornisce diversi strumenti di modifica: alcuni di questi si trovano al- tera rga. | | 

l’interno del menu Modifica; altri sono rappresentati da tasti o loro combina- Lo schermo dovrebbe apparire come nella prima figura di pagina seguen- 
zioni. Le esercitazioni seguenti rappresentano un’utile rassegna generale di te. 
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File Modifica Visualizza Cerca Esegui Debug Opzioni 


Cerca "italo Debug Opzioni 


| per Maria.’ 
Ctrl+Ins 


Maiusc+InsM 


| Nuova IRINCTION. 


Fi=Guida | Elimina il testo selezionato e lo copia nel bufferl 96002: 001 
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Scegliete il comando Taglia dal menu Modifica; potrete vedere che l’i- 
struzione PRINT scompare dalla Finestra di digitazione e resta solo l’1- 
struzione CLS (come mostrato nella figura successiva). Sebbene non sia 
visibile sullo schermo, l’istruzione PRINT non è scomparsa definitiva- 
mente, ma è stata posta negli Appunti di QBasic. 

Il passo successivo sarà perciò quello di incollarla (Incolla) dagli Appunti 
nuovamente all’interno del programma. 


Capitolo 2 - Elementi base di QBasic 


File Modifica Visualizza Cerca Esegui Debug Opzioni 
Senza titolo 


Spostate il cursore nel punto in cui desiderate inserire il testo. Per inserire 
l’istruzione PRINT dopo CLS basta premere il tasto di direzione Giù una 
volta per collocare il cursore sotto la riga che contiene l’istruzione CLS. 


Aprite il menu Modifica. 


Scegliete il comando Incolla. Lo schermo dovrebbe ora apparire come 
nella figura di pagina seguente. 


NOTA: Se, dopo aver completato quest operazione, l’ i- 
struzione PRINT viene inserita prima di CLS, è probabi- 
le che non abbiate collocato correttamente il cursore. 
Ricordate che se volete incollare il contenuto degli Appunti dopo 
una particolare istruzione, dovete assicurarvi che il cursore si trovi 
nella riga immediatamente sotto questa, prima di eseguire il coman- 
do Incolla. Ripetete quest’ operazione, se necessario, in modo che 
l'istruzione PRINT si venga a trovare dopo CLS. 
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File Modifica Visualizza Cerca Esegui Debug Opzioni 
Senza titolo 

(CLS st 
IPRINT "Marco, sono preoccupato per Maria. 


Immediato 


<Maius+Fi=Guida)<F6=Finestra)<F2-Subs}<F5-Esegui><F8-Passo> 90002 :901 


7. Provate eseguire il programma per vedere il risultato del cambiamento: 


Marco, sono preoccupato per Maria. 


Premere un tasto per continuare 


8. Premete un tasto qualsiasi per riattivare la Finestra di digitazione 
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Esercizio: Modifica di un programma coi comandi Copia e Incolla 


Dopo aver posizionato correttamente l’istruzione CLS, proviamo ora ad am- 
pliare il nostro programma usando i comandi Copia e Incolla. 


1. Selezionate nuovamente l’intera istruzione PRINT. 


2. Scegliete il comando Copia dal menu Modifica; notate che la riga sele- 
zionata non scompare dal programma. 


3. Spostate il cursore una riga sotto quella dell’istruzione PRINT e potete 
notare che questa non è più evidenziata. 


4. Scegliete Incolla dal menu Modifica 


S. Scegliete Incolla di nuovo, fino all’inserimento di cinque istruzioni 
PRINT. Il vostro programma dovrebbe ora apparire in questo modo: 


File Modifica Visualizza Cerca Esegui Debug Qpzioni 
Senza titolo 

CLS 

PRINT "Marco, sono preoccupato per Maria. 
PRINT "Marco, sono preoccupato per Maria. 
PRINT "Marco, sono preoccupato per Maria. 
PRINT "Marco, sono preoccupato per Maria. 
PRINT "Marco, sono preoccupato per Maria. 


Immediato 


{Maius+Fi=GuidaY<F6=Finestra}<FZ=Subs}<F5=Esegui><F8=Passo> 90083 :A81 


Se eseguite ancora il programma vedrete lo stesso messaggio comparire più 
volte sullo schermo. Vediamo di imparare come si cancellano alcune di que- 
ste istruzioni. 
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Esercizio: Cancellare testo col tasto Canc 


Lear 1. Spostate il cursore in corrispondenza alla lettera P dell’ultima istruzione 


PRINT e premete il tasto Canc più volte; potrete notare che questo tasto 
cancella il carattere sottolineato di volta in volta dal cursore. 


2. Continuate a premere Canc fino a che l’intera riga è stata cancellata. 


3. Se premete Canc ancora, alla fine comincerete a sentire un suono; ciò sta 
a indicare che non ci sono più caratteri da cancellare in quella riga (in ge- 
nerale, ogni volta che sentite un suono di questo genere significa che sta- 
te cercando di fare qualcosa che QBasic non ammette). 


Esercizio: Cancellare testo col tasto Backspace 
1. Spostate il cursore su di una riga. 


2. Premeteiltasto Fine per spostare il cursore alla fine della riga. 


3. Premete Backspace ripetutamente fino a far scomparire l’intera istruzio- 
ne. Notate che se continuate a premere Backspace una volta cancellata 
l’intera riga, il cursore si sposta alla fine della riga superiore e comincia a 
cancellare i caratteri in essa contenuti. 


Esercizio: Cancellare testo selezionato col tasto Canc 


lea 1. Selezionate una parte o tutta l’ultima istruzione PRINT. 


2. Premete Canc per far scomparire definitivamente tutto il testo selezionato 
(se ne avevate selezionato solo una parte, cancellate anche la rimanente). 
Premendo il tasto Canc al posto del comando Taglia si dice a QBasic di 
non conservare il testo cancellato negli Appunti. 


Esercizio: Cancellare un’intera riga con Ctrl-Y 


1. Spostate il cursore in un qualsiasi posto all’interno di una riga dell’istru- 
zione PRINT. 


2. Tenete premuto Ctrl e premete Y; otterrete lo stesso risultato che avreste 
ottenuto selezionando l’intera riga e usando il comando Taglia. 
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Ecco eliminate tutte le istruzioni PRINT! Infatti, se avete seguito questi 


esercizi dovreste ora trovarvi con l’istruzione CLS e una sola istruzione 
PRINT. 


Modifica del testo 


A volte si potrebbe voler cambiare solo parte di un’istruzione. Per far ciò la si 
può cancellare interamente e poi riscriverla, oppure si può modificare soltan- 
to la parte interessata; questa seconda soluzione consente di risparmiare tem- 
po e di ridurre i rischi di errore. 

Prendiamo in considerazione un’istruzione PRINT, la quale visualizza 
(stampa) qualunque testo si trovi tra le virgolette che la seguono. Se avete 
usato questa istruzione in un vostro programma e decidete di cambiarne il 
messaggio, tutto ciò che dovete fare è modificare il testo tra le virgolette; per 
far ciò potete seguire diversi metodi. 

Potete cancellare il testo esistente (usando uno dei metodi descritti in pre- 
cedenza) e digitare il nuovo messaggio; oppure potete semplicemente digitare 
il nuovo testo usando uno dei due cursori disponibili: il cursore di inserimen- 
to e il cursore di sovrascrittura. 


Il cursore di inserimento 


Il cursore usato fino a questo momento (rappresentato da un segno di sottoli- 
neatura lampeggiante) è detto cursore di inserimento, perché consente di inse- 
rire del testo in mezzo a una riga senza eliminare quello già esistente. Per 
inserire testo usando il cursore di inserimento basta seguire questi passi: 


1. Spostate il cursore nel punto in cui volete inserire il testo. 


2. Digitate il testo desiderato. 


Esercizio: Inserimento di testo col cursore di inserimento 


1. Spostate il cursore in corrispondenza della prima lettera dopo le virgolet- 
te di apertura del messaggio dell’istruzione PRINT. 


2. Digitate alcune lettere e osservate quel che succede: il messaggio esisten- 
te si sposta verso destra lasciando spazio al nuovo testo digitato. 


3. Usate il tasto Backspace per cancellare le lettere inserite e ristabilire il 
messaggio originale. 
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Il cursore di sovrascrittura 


L'altro cursore viene detto di sovrascrittura, perché sostituisce i caratteri esi- 
stenti con quelli digitati. L’uso di questo cursore può talvolta consentire un ri- 
sparmio di tempo, dal momento che non si deve cancellare alcun carattere. 
Per usare il cursore di sovrascrittura si possono seguire questi passi: 


1. Spostate il cursore all’inizio dei caratteri da sovrascrivere. 


2. Premete il tasto Ins; il cursore cambia forma diventando un rettangolo 
lampeggiante. 


3. Digitate i caratteri desiderati. 


Esercizio: Uso del cursore di sovrascrittura 


1. Spostate il cursore in corrispondenza della prima lettera dopo le virgolet- 
te di apertura del messaggio dell’istruzione PRINT. 


2. Premete il tasto Ins; il cursore cambia forma diventando un rettangolo 
lampeggiante. 


3. Iniziate a digitare il nuovo messaggio e osservate cosa succede: i nuovi 
caratteri sostituiscono quelli precedenti. 


File Modifica Visualizza Cerca Esegui Debug Opzioni I; 
Senza titolo tl 


CLS 
PRINT "iarco, sono preoccupato per Maria." 
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4. Seilnuovo messaggio è più breve di quello precedente potete usare Canc 
per eliminare i caratteri rimanenti (ricordatevi di non cancellare le virgo- 
lette di chiusura); se invece è più lungo ricordatevi di inserire delle virgo- 
lette di chiusura alla fine del messaggio. 


5. Eseguite il programma per vedere il nuovo messaggio e poi ritornate alla 
Finestra di digitazione, premendo un tasto qualsiasi. 


6. Premete Ins per riportare il cursore in modalità inserimento. Vi suggeria- 
mo di mantenere il cursore in questa modalità nel prosieguo del libro. 


Salvataggio del programma su disco 


Dopo aver scritto un programma, se volete conservarlo, dovete salvarlo su di- 
sco. Se non lo salvate, il programma andrà perso quando il computer viene 
spento e sarete costretti a riscriverlo da capo. 

Il programma appena scritto è molto breve e non richiederebbe un grande 
sforzo se dovesse essere riscritto; ma quando si comincia a scrivere program- 
mi di una certa dimensione diventa assolutamente consigliabile salvarli su di- 
SCO. 


Esercizio: Salvataggio di un programma su disco 


1. Scegliete il comando Salva con nome... dal menu File, che visualizza la 
seguente finestra di dialogo: 


Modifica Visualizza Cerca Esegui Debug Opzioni 
Senza titolo 
CLS 
PRINT "Marc Salva con nome 


| C:INDOS 


LIST 
Dir/Unitaà 


<Annulla> <Guida> 


Immediato 


Fi=sGuida Imuio=Esegui Esc=Amulla Tab=Campo seg. —Freccia=Voce seg. __ 
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2. Digitate questo testo nella casella Nome del file: 


primo.bas 


NOTA: Siccome QBasic parte dal presupposto che il file 
che viene salvato sia un programma, gli attribuisce 
automaticamente l'estensione .BAS anche senza che 
questa venga digitata. 


3. Premete Invio per eseguire il comando Salva con nome...; QBasic salverà 
il vostro programma col nome PRIMO.BAS. 


Dopo aver salvato il programma su disco, QBasic riattiva la Finestra di 
digitazione e il nome del file compare in cima alla finestra; in questo modo è 
sempre possibile sapere su quale programma si sta lavorando e, se il titolo 
della finestra è “Senza titolo”, si può dedurre che il programma non è ancora 
stato salvato. 

Non è necessario che un programma sia completo prima che possa essere 
salvato. Come si fa a decidere quando un programma dev'essere salvato per 
la prima volta e quanto spesso dev'essere salvato dopo quella prima volta? 
Per rispondere a questa domanda basta che vi chiediate quanto lavoro andreb- 
be perso se venisse accidentalmente a mancare la corrente. 
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Cambiamento di un file salvato 


Se si apportano cambiamenti a un programma dopo che è stato salvato, il 
programma modificato viene trattato da QBasic come un programma separato 
all’interno della Finestra di digitazione. Ciò significa che QBasic non vi per- 
metterà di lavorare su un altro programma prima di sapere che cosa volete fa- 
re con la versione modificata del programma corrente: volete sovrascrivere la 
versione salvata con quella modificata oppure volete che i cambiamenti ven- 
gano scartati? 


Esercizio: Lavorare con cambiamenti a un file salvato 


1. Apportate dei cambiamenti al programma nella Finestra di digitazione 
(potete fare 1 cambiamenti che volete, per esempio cambiando il messag- 
gio dell’istruzione PRINT o aggiungendo una seconda istruzione). 


2. Dopo aver effettuato 1 cambiamenti scegliete il comando Salva con no- 
me... dal menu File. Si noti che la casella Nome del file contiene il nome 
che era stato dato al programma in precedenza; a questo punto avete più 
Opzioni: 
loi | Modifica Visualizza Cerca Esegui Debug Opzioni 

PRIMO .BAS 


(CLS 
PRINT "Marc Salva con nome 


Nome del file! PRIMO. BAS 
| C:NDOS 


Dir/Unità 


<immulla> <Guida> 


- Immediato = 


Fi=Guida _Imvio-Esegui Esc-Annulla _Tab-Campo seg. __Freccia-Voce seg. 


O Scegliere OK per salvare la versione modificata del programma, so- 
stituendo quella precedente. 
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© Digitare un nuovo nome per il programma modificato e scegliere 2. Dopoavereffettuato il cambiamento scegliete Nuovo dal menu File e ve- 
OK. In questo modo si salva la versione modificata sotto un nuovo drete apparire questa finestra di dialogo: 


nome, mantenendo inalterata quella originale. 


DM Scegliere Annulla per cancellare l’operazione di salvataggio e ripri- 
stinare la Finestra di digitazione 


DM Scegliere Guida (?) per visualizzare un’altra finestra di dialogo che o 
spiega il contenuto della finestra del comando Salva con nome... o 


3. Premete Invio per scegliere OK e salvate il programma modificato al po- 
sto di di ia 


< Salvare s spesso A. ZDDDÒDÒDÌ  °]°! Se premete Invio scegliendo la risposta predefinita, “Si”, QBasic salva la 
: | Fino a a ‘quando il programma n ‘non viene e salvato su Li disco. tutto ciò che | versione modificata del DIQSLAMIMa usando il nome che appare in cima 
| viene digitato nella Finestra di digitazione viene conservato nella me alla Finestra di digitazione e sovrascrive la versione precedente. In questo 
| moria temporanea del computer. Cercate di salvare i i vostri programmi - caso non è possibile digitare ORD diverso (per far CIÒ bisogna PISEAS= 
su disco con regolarità per evitare di perdere informazioni; basta infatti re Esc per uscire da questa finestra di dialogo e poi scegliere il comando 


| chesi verifichi una temporanea perdita di corrente perché tutte le infor- Salva con nome... dal menu Modifica e attribuire al programma modifi- 
i | mazioni. conservate nella memoria ‘temporanea . del ‘computer vadano SO E DIA): RARI i 
i - Se scegliete il pulsante “No” QBasic non salva i cambiamenti apportati 


- . erse. Sei invece conservate il vostro TO amma su a disco o( isso o o fles- . ; ce i 
pi PIOSE _..... dall’ultima volta che il file era stato salvato; fate bene attenzione all’uso 


- sibile otrete sem re recu erarlo con facilità. i SE i i i vi 
. 1. | Lu da io, di questo pulsante, perché rischiate di perdere importanti modifiche. 


3. Se volete salvare il programma modificato e sovrascrivere la versione 


INIZIARE UN NUOVO PROGRAMMA precedente, premete Invio; altrimenti premete il tasto Tab per passare al 
| ei R ulsante “No” e poi premete Invio. 
La Finestra di digitazione può contenere un solo programma alla volta (sia dii iii ui SL PRE RRERE ORO AE FRE E 
che si tratti di un programma appena digitato sia che si tratti di un programma P p Sa P a ga 
caricato da disco). Per ripulire la Finestra di digitazione dal programma cor- vo programma. Provate a scrivere alcune istruzioni PRINT per esercitarvi 
CARI 1 tiro su quanto abbiamo visto fino ad ora e poi salvate il programma. 

rente e cominciare a scriverne uno nuovo basta scegliere il comando Nuovo q È Bis 

dal menu File. Se il programma nella Finestra di digitazione è stato modifica- 

to QBasic non vi permetterà di avviarne uno nuovo fino a che non deciderete 


che cosa fare della versione modificata. APERTURA DI UN PROGRAMMA ESISTENTE 
Per lavorare con un programma conservato su disco, bisogna prima aprirlo, 
Esercizio: Avviamento di un nuovo programma così come bisogna aprire un libro per poterlo leggere; quando si apre un pro- 


gramma questo viene caricato nella Finestra di digitazione. Per aprire un pro- 
gramma si usa il comando Apri... del menu File. 


1. Apportate qualche modifica al programma contenuto nella Finestra di di- 
gitazione (per esempio modificate il messaggio dell’istruzione PRINT). 
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Esercizio: Apertura di un programma esistente 


lea 1. Aprite il menu File e osservate che il comando Apri... è seguito da dei 


puntini di sospensione (...). 


2. Scegliete il comando Apri... per visualizzarne la finestra di dialogo. 


ER Modifica Visualizza Cerca Esegui Debug Opzioni 
n Senza titolo. 
Apri 


Nome del file: 


{| CINDOS 


GORILLA. BAS 
MONEY. BAS 
NIBBLES.BAS 
PRIMO .BAS 
REML INE. BAS 


<Annulla> {Guida} 


Fi=Guida Invio-Esegui Esc-Amulla Tab=Campo seg. Freccia=Voce seg. 
3. Premete Tab per spostare il cursore nella casella Nome del file. 
4. Evidenziate REVERSI.BAS. 


5. Scegliete OK e QBasic apre il programma caricandolo nella Finestra di 
digitazione. 


Ora avete la possibilità di modificare o eseguire il programma REVER- 
SI.BAS (un gioco). Questo metodo viene usato per caricare qualsiasi file esi- 
stente su disco (si può usare la casella Dir/Unità per individuare file collocati 
in altre aree del disco). 


USCITA DA QBASIC 


Se avete terminato la vostra sessione di programmazione è consigliabile usci- 
re da QBasic prima di spegnere il computer; in questo modo eviterete di di- 
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menticarvi di salvare qualcosa di importante, che andrebbe automaticamente 
persa allo spegnimento del computer. 

Per uscire da QBasic scegliete Esci dal menu File; ricordate che se la Fi- 
nestra di digitazione contiene un programma che non è stato salvato o che è 
stato modificato QBasic vi chiederà se intendete salvarlo oppure no. 


SOMMARIO 


In questo capitolo avete potuto vedere alcuni elementi importanti per impara- 
re a usare QBasic. Avete appreso come avviare, usare e uscire da QBasic, co- 
me scrivere, eseguire, modificare e salvare i vostri programmi. Nel prossimo 
capitolo vedremo, in modo più approfondito, un gruppo di nuove istruzioni. 


DOMANDE ED ESERCIZI 


1. Come si avvia QBasic? 


2. Vero o Falso: l’apertura di un file di programma conservato su disco can- 
cella quel file dal disco stesso. 


3. Qual è la differenza tra la Finestra di digitazione e la Finestra Immedia- 
to? 


. Qual è la differenza, nel menu File, tra il comando Nuovo e Apri...? 
. Qual è la differenza tra la Finestra di digitazione e lo schermo di output? 


. Qual è la differenza, nel menu Modifica, tra il comando Taglia e Copia? 


ui Ai a da 


. Quali sono i quattro modi per cancellare testo da un programma e in che 
cosa differiscono l’uno dall’altro? 


8. Qual è la differenza tra il cursore di inserimento e quello di sovrascrittu- 
ra? Come posso individuare quale dei due è attivo? Come posso passare 
dall’uno all’altro? 


9. Escludendo l’estensione .BAS qual è il massimo numero di caratteri che 
si possono usare per nominare un file? 


10. Quali dei nomi seguenti non può essere il nome di un programma? Per- 
ché no? 
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NOMESTAMPA.BAS; SALVE! .BAS; BLU+BLU.BAS; 
BLU BLU. BAS; ABC-E-DEF.BAS; BUSINESS.BAS; 
PALLONE.BAS:; PROG[1].BAS; 50%FATTO.BAS:; 
1*PROG.BAS; MODO MIO.BAS; VA-BENE.BAS 


11. Come si esce da QBasic? Che cosa succede se si cerca di uscire prima di 
aver salvato il lavoro compiuto e quali opzioni si presentano? 
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Nell’ultimo capitolo abbiamo potuto acquisire una certa familiarità con QBa- 
sic e abbiamo usato un paio di istruzioni per scrivere un semplice program- 
ma. In questo capitolo esamineremo più in profondità il linguaggio QBasic, 
ampliando alcuni concetti già espressi in precedenza. 


ANATOMIA DI UN’ISTRUZIONE QBASIC 


Fino ad ora abbiamo fatto riferimento a una riga di QBasic come a un’istru- 
zione. Come avete imparato nel capitolo 1 ogni riga di un programma QBasic 
è semplicemente un’istruzione che il computer esegue quando si fa girare il 
programma. QBasic riconosce due tipi di istruzioni: enunciati e funzioni. 


Enunciati e funzioni 


Gli enunciati e le funzioni di QBasic sono molto simili e ugualmente facili da 
usare; la differenza principale è questa: 


3 Unenunciato è un'istruzione diretta che fa semplicemente ciò che le vie- 
ne detto quando si esegue il programma. Quando il programma esegue un 
enunciato il risultato è, nella maggior parte dei casi, evidente: l’enunciato 
PRINT, per esempio, mostra dei caratteri sullo schermo output e l’enun- 
ciato CLS lo pulisce. 


8 Una funzione restituisce un valore che il programma può usare; il suo 
funzionamento è meno ovvio di quello di un enunciato. Essa generalmen- 
te compare all’interno di un enunciato e svolge il suo compito al momen- 
to dell’esecuzione dell’enunciato. 


Enunciati e funzioni hanno una propria sintassi, che serve a regolare il 
modo in cui vengono usati nel programma. 


La sintassi di QBasic 


La sintassi di un’istruzione QBasic, che si tratti di una funzione o di un enun- 
ciato, è costituita semplicemente da una parola chiave seguita dalle informa- 
zioni necessarie all’esecuzione del compito. 

La sintassi di alcune istruzioni QBasic (come BEEP) consiste solamente 
nel nome dell’enunciato o della funzione. Avviate QBasic e digitate il se- 
guente programma costituito da una sola riga: 
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BEEP 


Eseguite il programma e osservate che cosa succede: l’enunciato BEEP 
fa sì che l’altoparlante interno al computer emetta un breve suono. 

Ora cercheremo di dare un’occhiata a istruzioni più complesse; nel corso 
di questo capitolo useremo l’enunciato PRINT come base per i nostri esempi. 


Sintassi dell’enunciato PRINT 
L’enunciato PRINT presenta questa sintassi: 


PRINT [listaespressione] [,]|;] 


Come potete vedere non è molto simile all’enunciato PRINT visto nel secon- 
do capitolo! PRINT è infatti un enunciato molto versatile e nel capitolo pre- 
cedente abbiamo usato solo una delle sue molte capacità. Diamo un’occhiata 
più da vicino alla struttura di questa riga di sintassi: 


Parentesi attorno 


cer (0 agli argomenti 


PRINT [listaespressione] [,]|;] 


PAROLA CHIAVE ARGOMENTI 


Figura 3-1. Struttura di una riga di sintassi. 


Con l’eccezione della parola chiave ogni elemento di una riga di sintassi vie- 
ne detto argomento; esso fornisce all’istruzione le informazioni addizionali 
necessarie per l’esecuzione del suo compito. Alcuni argomenti sono facoltati- 
vi; essi vengono mostrati tra parentesi quadre sia in questo libro sia nella gui- 
da on line di QBasic, ma se decidete di usarli in una vostra istruzione ron 
dovete racchiuderli tra parentesi (allo stesso modo non c’è bisogno di inseri- 
re il carattere “I”: esso indica semplicemente che dovete scegliere uno degli 
argomenti che si trovano ai lati. Nel caso della figura 3-1 dovreste scegliere 
tra la virgola e il punto e virgola). In un enunciato PRINT entrambi gli argo- 
menti sono facoltativi; infatti la parola chiave PRINT può essere usata anche 
da sola. 


Esercizio: Uso di un enunciato PRINT con argoment 


1. Selezionate il comando Nuovo dal menu File 
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2. Scrivete il programma seguente ed eseguitelo: 


CLS 

PRINT "Questo enunciato usa un argomento" 

PRINT 

PRINT "Anche questo enunciato usa un argomento" 


Il vostro schermo apparirà in questo modo al momento dell’esecuzione: 
Questo enunciato usa un argomento 


Anche questo enunciato usa un argomento 


Come potete vedere, un enunciato PRINT non corredato da alcun argomento 
stampa una riga vuota (si noti che non basta premere Invio per inserirne una). 
Vediamo ora i tre tipi di argomenti che possono essere usati con l’enunciato 
PRINT: testo, espressioni numeriche e funzioni. 


Uso di testo come argomento 


Nell’ultimo capitolo abbiamo usato del testo tra virgolette (“Marco, sono pre- 
occupato per Maria”) come argomento listaespressione dell’enunciato 
PRINT. Questo testo viene detto anche stringa: una stringa può contenere nu- 
meri, lettere, spazi, segni di interpunzione — con l’eccezione delle doppie 
virgolette che vengono interpretate da QBasic come indicatori di fine stringa. 


Uso di espressioni numeriche come argomento 


Un altro possibile argomento listaespressione è un’espressione numerica, che 
può essere rappresentata da un numero, un’equazione matematica o, come 
vedremo nel prossimo capitolo, da uno speciale tipo di parola detta variabile 
numerica. Le espressioni numeriche non debbono essere racchiuse tra virgo- 
lette. 


Esercizio: Uso di espressioni numeriche come argomenti 


1. Modificate il programma appena scritto in modo che contenga soltanto il 
seguente enunciato PRINT: 
CLS 
PRINT 42 
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2. Eseguite il programma e avrete questo risultato sullo schermo: 
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Uso di funzioni come argomenti 


Un terzo argomento listaespressione è una funzione di QBasic, che esegue 
generalmente un compito “dietro le quinte”, restituendo informazioni che 
possono essere usate nel programma. Anche le funzioni non devono essere 
racchiuse tra virgolette. 


Esercizio: Uso di funzioni come argomenti 


QBasic contiene due funzioni, dette DATE$ e TIMES, che mostrano la data e 
l’ora corrente sulla base dell’orologio interno al vostro computer. Non è pos- 
sibile usare queste funzioni da sole (in altre parole non le si può collocare su 
una riga e aspettarsi che succeda qualcosa) ma si possono usare come argo- 
menti di un enunciato PRINT. 


1. Selezionate il comando Nuovo dal menu File. 
2. Scrivete questo programma ed eseguitelo: 
CLS 


PRINT DATES 
PRINT TIME$ 


Lo schermo apparirà in questo modo al momento dell’esecuzione: 


25-03-1991 
21:13:09 


È ovvio che la data e l’ora in questo esempio non sono uguali a quelle che voi 
vedrete in output sul vostro schermo, ma il principio di fondo rimane: le fun- 
zioni DATE$ e TIME$ hanno eseguito un certo compito e hanno restituito un 
certo valore. Questa è la bellezza delle funzioni di QBasic: eseguono il com- 
pito cui sono preposte senza che ci si debba preoccupare dei particolari. 
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Stampare più elementi con l’istruzione PRINT 


Fino ad ora abbiamo usato un solo argomento (per esempio una singola strin- 
ga o una singola funzione) per ogni enunciato PRINT. È possibile tuttavia 
usare più argomenti in un solo enunciato PRINT, purché si usi uno speciale 
carattere, detto separatore, per separarli; PRINT riconosce due caratteri di se- 
parazione: virgola e punto e virgola. 


La virgola 


In programmazione si può considerare la virgola come l’equivalente del tasto 
Tab. Quando PRINT incontra una virgola stampa il valore dell’argomento 
successivo all’inizio della successiva zona di stampa (le zone di stampa sono 
l'equivalente delle tabulazioni; la loro lunghezza è di 14 caratteri). Questa ca- 
pacità di stampare in collocazioni specifiche fa della virgola la scelta più co- 
mune quando si vogliono stampare informazioni in colonna. 


Esercizio: uso della virgola come separatore 


le 1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma per vedere come agisce la virgola 
usata come separatore: 


CLS 
PRINT "Le", "virgole", "separano", "argomenti" 
PRINT "Le", "virgole", "allineano", "argomenti" 


Il vostro schermo output apparirà in questo modo: 


Le virgole separano argomenti 
Le virgole allineano argomenti 


NOTA: Se non avete inserito uno spazio dopo ogni vir- 
gola, QBasic lo inserisce automaticamente quando pre- 
mete Invio alla fine della riga. Uno spazio viene sempre 
inserito dopo un separatore per dare un'immagine più ordinata al 
programma. 


Le virgole si possono usare anche da sole, cioè senza che vi sia alcun ar- 
gomento tra di loro, come mostra l’esercizio successivo. 
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Esercizio: posizionamento degli argomenti con le virgole 
1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma che usa le virgole per posizionare 
certi valori al centro dello schermo: 


CLS 
PRINT, , "Uso della virgola per" 
PRINT, , "separare gli argomenti" 


Il vostro schermo output apparirà in questo modo: 


Uso della virgola per 
separare gli argomenti 


Il punto e virgola 


Quando l’istruzione PRINT incontra un punto e virgola stampa l'argomento 
successivo immediatamente dopo quello appena stampato, senza inserire al- 
cuno spazio tra gli argomenti; diventa perciò necessario mettere gli spazi se si 
vuole che questi vengano inseriti. 


Esercizio: Uso del punto e virgola come separatore 


A 28 1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma che usa il punto e virgola come 
separatore, con e senza l’inserimento di spazi: 


CLS 
PRINT "Il"; "punto"; "e"; "virgola" 
PRINT "Il "; "punto "; "e": "virgola " 


Il vostro schermo output apparirà in questo modo: 


Ilpuntoevirgola 
I] punto e virgola 
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Uso della virgola e del punto e virgola insieme 


Naturalmente è possibile usare i due separatori insieme su una stessa riga; 
virgole e punti e virgole possono essere usati contemporaneamente, conti- 
nuando a svolgere le loro funzioni. 


Esercizio: Uso della virgola e del punto e virgola insieme 


der. 


2. 


Selezionate il comando Nuovo dal menu File. 


Scrivete ed eseguite questo programma che usa la virgola e il punto e vir- 
gola sulla stessa riga: 


CLS 
PRINT "Queste"; "parole"; "sono"; "unite", "Queste", "sono", "separate" 


Il vostro schermo output apparirà in questo modo: 


Questeparolesonounite Queste sono separate 


Uso di un separatore alla fine di un enunciato PRINT 


Quando si inserisce una virgola o un punto e virgola alla fine di un enunciato 
PRINT, si indica il punto in cui dovrà apparire il risultato dell’enunciato 
PRINT successivo: 


Una virgola stampa il risultato dell’enunciato PRINT successivo all’ini- 


zio della successiva area di stampa. 


Un punto e virgola stampa il risultato dell’enunciato PRINT successivo 
immediatamente dopo quello dell’enunciato corrente. 


Esercizio: Uso di un separatore alla fine di un enunciato PRINT 


der. 


Z; 
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Selezionate il comando Nuovo dal menu File. 


Scrivete ed eseguite questo programma che usa il punto e virgola alla fi- 
ne di un enunciato PRINT: 


CLS 
PRINT "Questa è la prima riga"; 
PRINT "e questa è la seconda" 
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Il risultato sarà: 


Questa è la prima riga e questa è la seconda 


3. Ora sostituite il punto e virgola con una virgola ed eseguite il programma 
di nuovo. 


NOTA: Se si usa il punto e virgola alla fine di un enun- 
ciato PRINT e non ci sono altre enunciati di questo tipo, 
l’uso di questo separatore non produce alcun effetto. 


SOMMARIO 


In questo capitolo abbiamo approfondito le istruzioni di programmazione di 
QBasic e abbiamo visto varie opzioni di sintassi che rendono gli enunciati di 
QBasic più versatili. Nel prossimo capitolo vedremo due importanti elementi 
di QBasic in grado di rendere i programmi ancora più flessibili: variabili e 
operatori. | 


DOMANDE ED ESERCIZI 


1. Descrivete brevemente la differenza tra un enunciato e una funzione. 


2 Qualitra queste parole chiave sono enunciati e quali sono funzioni? 


BEEP DATE$ TIME$ 
CLS PRINT 


3. Inunariga di sintassi qual è il significato delle parentesi quadre attorno a 
un oggetto? Che cosa significa il carattere ‘“l°?? 


4. Che cos’è un argomento? 
S. Qual è la differenza tra una stringa e un’espressione numerica? 


6. Quale sarà 1l risultato di questi due enunciati PRINT? 


PRINT "Ti", ; "amo" 
PRINT "Ti"; , "amo" 


7. Che cosa succede quando si inserisce un punto e virgola o una virgola al- 
la fine di un’istruzione PRINT? 
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Durante la programmazione può essere necessario stampare più di una volta 
certi numeri o stringhe di caratteri. QBasic soddisfa quest'esigenza con un 
metodo molto semplice che non richiede una gran quantità di digitazioni. Con 
QBasic è infatti possibile conservare dati e usarli quando necessario sempli- 
cemente utilizzando il nome del luogo in cui questi dati sono conservati; a 
questo luogo potete attribuire un nome in base al tipo e alla dimensione dei 
dati che contenuti. 


CHE COSA È UTILE CONSERVARE? 


Le variabili sono di due tipi: stringhe e numeriche. Una variabile stringa è un 
nome che indica il posto in cui è conservata una stringa; una variabile nume- 
rica è un nome che indica il posto in cui è conservato un numero. Le variabili 
numeriche possono essere suddivise in molti sotto tipi. La figura 4-1 mostra 1 
tipi di variabili che possono essere usati in QBasic. 


VARIABILI - 
NUMERICHE | STRINGA ($) 


INTERE . VIRGOLA MOBILE |È 


| Regular (%) È Long (&) - Precisione - Precisione 
singola (!) 


doppia (#) _ 


Figura 4-1. Quadro generale dei tipi di variabili utilizzabili in QBasic. 


Nel leggere questo capitolo cercate di tenere a mente le seguenti doman- 
de. dal momento che le loro risposte vi potranno aiutare a determinare quale 
tipo di variabile è più indicata in relazione ai Vostri SCOPI. 
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@ Idatida conservare sono testo o numeri? Un testo viene conservato in 
una variabile stringa; un numero in una variabile numerica. 


3 Seildato da conservare è un numero, contiene un separatore deci- 
male? Un intero — cioè un numero senza separatore decimale — viene 
conservato in una variabile intera. Un numero con un separatore decimale 
viene conservato in una variabile in virgola mobile. 


3 Quanto è grande il numero da conservare? La dimensione gioca un 
ruolo importante nel determinare quale variabile usare. 


DESCRIZIONE GENERALE SULL’USO 
DELLE VARIABILI 


Quando si decide di usare una variabile bisogna dichiararlo nel programma, il 
che significa che bisogna dare a QBasic tre informazioni: 


2 JIlnomedellavariabile 
3  Iltipodella variabile 


Ss Ilvalore della variabile 


La figura 4-2 mostra gli elementi di una dichiarazione, attraverso l’esem- 
pio della dichiarazione di una variabile stringa. 


La sezione che segue descrive come usare ciascuno di questi elementi. 


Carattere di dichiarazione del tipo 


ai 


animali$ = "leoni e tigri e orsi" 


Nome variabile eni bea Valore variabile 


Figura 4-2. Gli elementi della dichiarazione di una variabile. 


Dare il nome a una variabile 


Le regole e i suggerimenti che seguono vi aiuteranno nello scegliere i nomi 
più appropriati da attribuire alle variabili di QBasic: 


Bi Il nomediuna variabile può essere costituito da un massimo di 40 carat- 
teri. 
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s Il nomediuna variabile può essere costituito da una qualsiasi combina- 
zione di lettere maiuscole e minuscole (tenete presente, pero, che nomi 
tutti in maiuscole potrebbero confondersi con le parole chiave di QBa- 


SIC). 


e Il nome di una variabile non può coincidere con una parola chiave di 
QBasic, come PRINT o BEEP. 


sm Ilcarattere per indicare la dichiarazione del tipo di variabile dev'essere 
l’ultimo carattere del nome della variabile (si veda “Dichiarazione del ti- 
po di variabile”). 


8 Più i nomi delle variabili sono descrittivi meglio è; per esempio questi 
nomi di variabili stringa, Nome$ e Cognome$, lasciano pochi dubbi sul 
tipo di informazione in esse contenute. 


NOTA: QBasic è molto attento all’uso che viene fatto 
delle lettere maiuscole e minuscole; così sensibile che se 
si digita il nome di una variabile con una diversa combi- 
nazione di maiuscole e minuscole esso modifica i nomi precedenti, 
usando la nuova combinazione. 


Dichiarazione del tipo di variabile 


Nella figura 4-2 si può notare che il carattere finale del nome della varia- 


bile coincide con il carattere di dichiarazione del tipo, che specifica a QBasic 


che tipo di variabile si sta dichiarando. Ogni tipo di variabile ha un proprio 
simbolo: 


Usa questo carattere 
di dichiarazione del tipo 
| oct iii» — se +e or ita 


Se la variabile è questa 


Stringa $ 

Intero 3 
Regolare o 
Lungo 


Virgola mobile 
Precisione singola A 
Precisione doppia cu. A 


Quando QBasic incontra il carattere che specifica il tipo nel nome della 
variabile, sa esattamente che genere di dati vi sono conservati. 
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Dichiarazione del valore della variabile 


Quando si dichiara il valore di una variabile bisogna assicurarsi che il valore 
concordi con il tipo di variabile specificato. Per esempio, una variabile intera 
non potrebbe contenere un valore stringa. 


E adesso? 


Dopo aver visto la struttura generale della dichiarazione di una variabile pos- 
siamo cominciare a vedere i diversi tipi di variabili esistenti. Cominceremo 
con le variabili stringa e numeriche per poi vedere come ottenere informazioni 
dalla tastiera e come conservarle nelle variabili. La parte finale di questo capi- 
tolo descrive il funzionamento di QBasic in relazione a calcoli matematici. 


VARIABILI STRINGA IN QBASIC 


Il nome di una variabile stringa rappresenta il luogo in cui viene immagazzi- 
nata una stringa di testo che si vuole usare nuovamente all’interno del pro- 
gramma. 


Per dichiarare una variabile stringa bisogna inserire il carattere dollaro 
($) alla fine del nome della variabile. La stringa va racchiusa tra virgolette 
nello stesso modo visto per un enunciato PRINT; per esempio: 


AutoriUsa$ = "Kerouac, Ginsberg, Ferlinghetti" 

La dimensione e il contenuto delle variabili stringa possono cambiare al- 
l’interno del programma, come vedremo nel capitolo 9. 
Esercizio: Dichiarare e usare una variabile stringa 


1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma che assegna un valore a una va- 
riabile stringa e poi la stampa: 


CLS 
politici$ = "Moro, Berlinguer, Nenni" 
PRINT politici$ 


L’output del programma sarà questo: 


Moro, Berlinguer, Nenni 
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VARIABILI NUMERICHE IN QBASIC 


QBasic usa due tipi di variabili numeriche: le variabili numeriche intere e le 
variabili numerica, in virgola mobile. Ciascun tipo prevede dei sotto tipi per 
numeri di dimensioni diverse (ricordate che la dimensione del numero può 
aiutarvi a determinare che tipo di variabile usare). La figura 4-3 mostra le re- 
lazioni esistenti tra i diversi tipi di variabili numeriche in QBasic. 

Per prima cosa esamineremo i due tipi di variabili intere e quando usarle; 
poi passeremo all’analisi dei due tipi di variabili in virgola mobile. 


Variabili intere 


QBasic usa due tipi di variabili intere: l’intero di tipo regular e l’intero di tipo 
long. La differenza tra i due consiste nella dimensione del numero intero che 
ciascuno di essi può rappresentare. 


es 


Variabili intere regolari 


Una variabile intera di tipo regular può contenere qualsiasi numero intero 
compreso tra -32.768 e 32.767. Per dichiarare una variabile intera di tipo re- 
gular si usa il simbolo di percentuale (%) come carattere di dichiarazione del 
tipo da usare alla fine del nome della variabile. Per esempio: 


enricoMogli% = 6 
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NUMERICHE È 


INTERE - VIRGOLA MOBILE È 


Regular (%) — - Precisione . Precisione - 
singola (1) - doppia (#) - 


Figura 4-3. Variabili numeriche in QBasic. 


Esercizio: Dichiarare e usare una variabile intera di tipo regular 


1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma che dichiara e stampa una varia- 
bile intera di tipo regular: 


CLS 
giorniNatale% = 12 
PRINT giorniNatale% 


La schermata di output apparirà in questo modo: 


12 
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Variabili intere di tipo long 

Se si deve usare un numero intero non compreso nell’intervallo indicato prece- 

dentemente bisogna utilizzare una variabile intera di tipo /ong, la quale può 

rappresentare un numero intero compreso tra —2.147.483.648 e 2.147 483.647. 
Per dichiarare una variabile intera di tipo /ong si usa il simbolo di E com- 

merciale (&) come carattere di dichiarazione del tipo da inserire alla fine del- 

la variabile. Per esempio: 


Popolazione& = 175000 


_ Non si possono usare ele e virgole n nei numeri __- 


— ebbene ae: sia a i pia 


. Li di caratteri, non 1 può essere » impiegata all’ interno n espressioni _ 
. numeriche e e si dovrà usare il Punto ua du decimale. _ 


Era atteso: istruzione 


esecuzi ne del programma, QBasic chiede c di i digitarlo di NUOVO. . i - 


Esercizio: Dichiarazione e uso di una variabile intera di tipo long 
1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma che dichiara e stampa una varia- 
bile intera di tipo long: 
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CLS 
cadutalibera& = 84700 
PRINT "La più alta caduta libera, inpiedi, fu": cadutalibera& 


Il risultato apparirà così: 


La più alta caduta libera, in piedi, fu 84700 


Numeri in virgola mobile 


Fino ad ora abbiamo visto solo numeri interi. Molto spesso, però, si devono 
usare numeri che hanno una parte frazionale: cioè un numero seguito da un 
separatore decimale e l’espressione decimale della frazione. | 

QBasic fornisce due tipi di variabili per rappresentare numeri in virgola 
mobile: virgola mobile a precisione singola e a precisione doppia. La diffe- 
renza principale fra i due tipi di variabili consiste nell’accuratezza con cui 
possono rappresentare un certo numero contenente una virgola mobile. 


Uverf low 


| Box] <uida> 


- delle > variabili e mostrare all’ utente di i ‘inte allo 


i valori consentiti. oO. 
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e  Unavariabile in virgola mobile a precisione singola può rappresentare un 
numero composto da un massimo di 7 cifre e il punto decimale si può 
trovare in una qualsiasi posizione tra le cifre. 


s Una variabile in virgola mobile a precisione doppia può rappresentare un 
numero composto da un massimo di 15 cifre, con il punto decimale collo- 
cabile, anche in questo caso, in una posizione qualsiasi. 


La tabella seguente mostra alcuni esempi di valori in virgola mobile: 


Precisione singola Precisione doppia 


412.002 1.000032478 

19246.34 4280000.0055 

.00025 7160.0000000005 
10000000001 


657926.3 


Variabili in virgola mobile a precisione singola 


Per dichiarare una variabile in virgola mobile a precisione singola bisogna 
usare il punto esclamativo (!) come carattere di dichiarazione del tipo alla fi- 
ne del nome della variabile. Per esempio: 


Ipveloc! = 33.3333 


Esercizio: Dichiarazione e uso di una variabile in virgola mobile a precisio- 
ne singola 


1. Selezionate il comando Nuovo dal menu File. 
2. Scrivete ed eseguite questo programma che dichiara una variabile virgola 


mobile a precisione singola e ne mostra il valore. 


CLS 
tvPrezzo! = 2499999 
PRINT "Questo televisore costa "; tvPrezzo! 


L’output del programma sarà: 


Questo televisore costa 2499999 
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Variabili in virgola mobile a precisione doppia 


Le variabili in virgola mobile a precisione doppia (che possono rappresentare 
un numero composto al massimo di 15 cifre) sono particolarmente utili per 
scopi scientifici che richiedono numeri molto precisi. 

Per dichiarare una variabile in virgola mobile a precisione doppia biso- 
gna usare il simbolo # come carattere di dichiarazione del tipo alla fine del 
nome della variabile. Per esempio: 


piGreco! = 3.141592653589793 


Esercizio: Dichiarazione e uso di una variabile in virgola mobile a precisio- 
ne doppia 


1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma che dichiara e stampa una varia- 
bile in virgola mobile a precisione doppia e ne mostra il valore: 


CLS 
piGreco! = 3.141592653589793 


ra 


PRINT "I] valore di pi greco è ": piGreco! 


L’output del programma apparirà in questo modo: 


Il valore di pi greco è 3.141592653589793 


Come scegliere la variabile numerica da usare? 


Abbiamo visto che QBasic mette a disposizione quattro tipi di variabili nu- 
meriche: intera regular e long, in virgola mobile a precisione singola e virgo- 
la mobile a precisione doppia. Quando si vuole assegnare un valore numerico 
al nome di una variabile del programma bisognerà scegliere tra queste il tipo 
di variabile più appropriato; per far ciò può essere utile porsi le seguenti do- 
mande: 


Bi Ilnumeroèinteroe resterà tale nel corso dell’intero programma? Se la ri- 
sposta è positiva si userà una variabile intera. 


2 Il numero contiene una virgola decimale? O, meglio ancora, il numero 


potrebbe contenere una frazione nel resto del programma? Se la risposta 
è positiva si userà una variabile in virgola mobile. 
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Una volta determinato il tipo di variabile — intera o in virgola mobile — 
bisogna sceglierne la dimensione. 


Scegliere la dimensione appropriata per una variabile 


A prima vista si potrebbe pensare che le variabili intere di tipo long Gin vi 
gola mobile a doppia precisione siano la scelta migliore in ogni caso, perché 
possono contenere numeri più grandi, riducendo così il rischio di ottenere un 
messaggio di “Overflow” (che indica che il numero è al di fuori dell’interval- 
lo ammesso dalla variabile). Purtroppo anche queste variabili più grandi pre- 
sentano degli svantaggi che bisogna conoscere: se da un lato offrono maggior 
spazio per la conservazione di valori numerici, dall'altro richiedono una mag- 
gior quantità di memoria. Usare queste variabili quando non è necessario è un 
po’ come conservare un sacchetto di grano in un silos! La memoria di un 
computer è come un pezzo di terra: se si costruisce un silos ogni volta che si 
vuole immagazzinare un sacco di grano, alla fine si resta senza terra sul quale 
coltivarlo. Vi consigliamo perciò di usare attentamente le risorse disponibili, 
scegliendo in modo oculato il tipo di variabile da usare. 


Cambiamento dei contenuti di una variabile 


È facile capire l’utilità delle variabili: i loro contenuti possono variare in base 
alle esigenze del programma o dell’utente. È infatti possibile cambiarne i 
contenuti semplicemente assegnando loro un nuovo valore. Ricordate comun- 
que che il valore corrente di una variabile è quello che le è stato assegnato per 
ultimo. 


Esercizio: Cambiamento del valore di una variabile 
1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma che dichiara e poi modifica il va- 
lore di una variabile: 


CLS 

frutta$ = "mela" 
PRINT frutta$ 
frutta$ = "arancia" 
PRINT frutta$ 
frutta$ = "pera" 
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PRINT frutta$ 
La schermata di output apparirà in questo modo: 


mela 
arancia 
pera 


USO DI INFORMAZIONI FORNITE 
DALL’UTENTE IN UNA VARIABILE 


Dopo aver visto le variabili, cercheremo ora di analizzare un’area della pro- 
grammazione in QBasic che si basa molto sull’uso di variabili e, in particola- 
re, sull’ottenimento di caratteri da parte dell’utente del programma. Questo 
processo prende talvolta il nome di “lettura di caratteri dalla tastiera”. 


Lettura di caratteri con l’enunciato INPUT 


L’enunciato di QBasic più comunemente usato per la lettura di caratteri dalla 
tastiera è INPUT; quest’enunciato non può essere usato da solo ma dev’esse- 


re seguito dal nome della variabile (incluso il tipo) che si vuole assegnare ai 
caratteri digitati dall’utente. 


I, a Esercizio: Uso dell’enunciato INPUT 


1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite questo programma: 


CLS 


PRINT "Digitare una parola e premere Invio" 
INPUT parola$ 


PRINT "La parola digitata è ": parola$ 
Ecco il risultato: 


Digitare una parola e premere Invio 
? Giraffa 


La parola digitata è Giraffa 
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Diamo un’occhiata a ciò che è accaduto: 


Perprimacosail programma ha pulito lo schermo e ha usato l’enunciato 
PRINT per dire all’utente di digitare una parola. 


sm Poi, seguendo le istruzioni dell’enunciato PRINT, abbiamo digitato una 
parola e premuto Invio. Questa è stata assegnata alla variabile parola$ 
dall’enunciato INPUT. 


sw L'ultimo enunciato PRINT usa sia la stringa sia la variabile parola$ per 
visualizzare ciò che era stato digitato. 


Richiesta di input all’utente 


Il programma appena descritto usa l’enunciato PRINT per chiedere all’utente 
di fornire alcune informazioni, ma è possibile inserire la richiesta direttamen- 
te nell’enunciato INPUT. In questo modo INPUT viene a svolgere un duplice 
compito: richiede l’input all’utente e legge ciò che è stato digitato. 


Esercizio: Collocare un messaggio all’interno di INPUT 


Cambiate il programma precedente in questo modo: 


CLS 
INPUT "Digitare una parola e premere Invio"; parola$ 
PRINT "La parola digitata è ": parola$ 


Dopo aver eseguito il programma la schermata di output dovrebbe apparire in 
questo modo: 


Digitare una parola e premere Invio? Giraffa 
La parola digitata è Giraffa 


Notate le differenze tra questo programma e quello precedente: 


Siccome la richiesta fa parte dell’enunciato INPUT, il cursore rimane 
sulla stessa riga (e non in quella sottostante) in attesa di una risposta. 


a L’enunciato INPUT mostra un punto di domanda alla fine del messaggio 
(per eliminarlo basta sostituire con una virgola il punto e virgola che sl 
trova alla fine del messaggio INPUT ed eseguire nuovamente il program- 
ma). 
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Esercizio: Aggiungere un tocco di creatività all’enunciato INPUT 


Ora che abbiamo visto i fondamenti delle variabili e come ottenere informa- 
zioni da tastiera con l’enunciato INPUT, cerchiamo di aggiungere un po’ di 
creatività al programma: 


1. Selezionate il comando Nuovo dal menu File. 
2. Scrivete edeseguite questo programma: 


CLS 


INPUT "Digita il tuo nome e premi Invio: ", nome$ 
PRINT 


INPUT "Quanti anni hai (prometto di non dirlo a nessuno)? ". anni% 
PRINT 


INPUT "Quante lire hai in tasca?", soldi! 
PRINT 


PRINT "Grazie, "; nome$: ". Hai detto che la tua età è"; anni% 
PRINT "anni e che hai"; soldi!; "lire in tasca." 


Dopo aver eseguito il programma, la schermata di output dovrebbe appa- 
rire in questo modo: 


Digita il tuo nome e premi Invio: Lorenzo 
Quanti anni hai (prometto di non dirlo a nessuno)? 30 
Quante lire hai in tasca? 10000 


Grazie, Lorenzo. Hai detto che la tua età è 30 
anni e che hai 10000 lire in tasca. 
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OPERATORI MATEMATICI DI QBASIC 


QBasic mette a disposizione diversi simboli che si possono usare per eseguire 
calcoli matematici all’interno dei programmi. Questi simboli, detti operatori, 
permettono di eseguire addizioni, sottrazioni, moltiplicazioni e divisioni. 

Molti operatori QBasic sono simili a quelli normalmente usati per 1 cal- 
coli matematici; per esempio si usa il segno più (+) per l’addizione e quello 
meno (-) per la sottrazione. Alcuni operatori sono invece rappresentati da 
simboli speciali. La tabella che segue elenca tutti gli operatori che si possono 
usare in QBasic: 


Operatore Operazione matematica 


+ Addizione 

= Sottrazione 

i Moltiplicazione 

i Divisione 

\ Intero della divisione 

MOD Resto della divisione 

dì. Esponente (elevazione « a a potenza) 


Gli ultimi tre operatori (\, MOD e /) sono operatori a scopo specifico, come 
vedremo tra poco. 


Lavorare con gli operatori di QBasic 


L’uso degli operatori per eseguire calcoli matematici è molto semplice: per 
esempio, per sommare tra loro i numeri 12 e 16 basta scrivere 


12+16 


Tuttavia non si può semplicemente collocare un’operazione matematica come 
questa su una riga da sola. Ci sono due cose che si possono fare: 


8 Assegnare il risultato dell’operazione matematica a una variabile nume- 
rica: 


totale% = 12+16 ‘Assegna il risultato a una variabile 


8 Usare il risultato dell’operazione matematica come argomento per un 
enunciato di QBasic: 


PRINT 12+16 ‘Stampa il risultato direttamente 
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- | QBasic permette dii inserire dei commenti all’intemo deli programma, __° 
| scopo. di informazione. sulle varie azioni. di volta i in volta eseguite. |. 
| “commenti. vanno. fatti ‘precedere dall’enunciato REMo dal n - 


È = SES 9 


- REM Programmatori : Matteo | e Luca q 
4 Data: di marzo 1991 __..- 
n PRINT "Questo è cun programma | con on commenti __ 
I programma produrrà il seguente risultato: 
© Questo è e un 1 programma. con commenti. o 


- n simbolo “ sir ” può essere usato come <<... meno >) apparis ente me 
_ che svolge la stessa a funzione del i _ 


- ESEMPIO. BAS 
4 la dimostra 


C PRINT “Questo è 
- Li programma produrrà lo stesso risultato: 


Questo. è un programma, con commenti. 
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| | Aggiungere commenti ai programmi 


Ci servono a us io ( fel poazinate- es 


‘enunciato REM o 


si m programma. con commenti 


i In questo libro useremo questo ud metodo ] per i commenti. È con- i 


| sigliabile includere sempre dei commenti sia per proprio. USO, sia per . 
Mu utenti che cercassero di n capie. la struttura dei vostri i programmi. i 
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Si noti che quando si assegna un’operazione matematica a una variabile, ciò 
che in realtà si assegna è il risultato dell’operazione, come si vede qui sotto: 


Il risultato viene assegnato 


alla variabile fo 28 i 


total%=12+16 


Allo stesso modo quando si assegna un’operazione matematica all’argo- 


mento di un enunciato ciò che in realtà si usa è il risultato dell’operazione: 


» 28 appare nella finestra ouipui 


[ 
> print 12+16 


Il risultato viene usaio come 
argomento dell’enunciato 


da Esercizio: Lavorare con gli operatori di QBasic 


Nel capitolo 2 abbiamo visto che la Finestra Immediato è molto utile per pro- 


vare le righe di programma prima di inserirle; negli esercizi sull’uso degli 
operatori di QBasic useremo questa finestra. 


1. 
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Premete F6 per attivare la Finestra Immediato e poi inseritevi questa riga 
di programma: 


CLS 


Premete un tasto qualsiasi per attivare la Finestra Immediato e inseritevi 
questa riga: 


PRINT 7*7 
La schermata di output mostrerà il risultato dell’enunciato PRINT: 
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3. Riattivate la Finestra Immediato e inseritevi questa riga di programma: 


PRINT 75/6 


Anche questa volta l’output visualizzerà il risultato dell’enunciato 
PRINT: 


12,5 


Gli operatori \, MOD e 4 


QBasic ha tre operatori con scopo specifico: \, MOD e 4 : addizione, sottra- 
zione, moltiplicazione e divisione. 


L’operatore \ (intero della divisione) 

L'operatore intero della divisione (\) funziona esattamente come un operatore 
di divisione normale (/) con la differenza che quando un numero viene diviso 
per un altro la parte frazionale del risultato viene scartata, mantenendo solo la 
parte intera. 
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Esercizio: Uso dell’operatore (Y) 

Digitate la riga seguente nella Finestra Immediato: 
PRINT 5\2 

Lo schermo visualizzerà il risultato dell’operazione: 
2 


Il risultato normale della divisione sarebbe 2.5 o 2 col resto di 1, ma l’intero 
della divisione scarta il resto dando come risultato solo l’intero, cioè 2. 


L’operatore MOD 


MOD è a tutti gli effetti un operatore di QBasic nonostante le apparenze. L°o- 
peratore MOD viene anche chiamato operatore resto della divisione perché il 
suo risultato è l’opposto dell’operatore (\): ciò significa che quando si divide 
un numero per un altro usando questo operatore, QBasic scarta la parte intera 
del risultato restituendo solamente il resto. 


Esercizio: Uso dell’operatore MOD 

Digitate la riga seguente nella Finestra Immediato: 

PRINT 5 MOD 2 

Il risultato dell'operazione che appare nello schermo output sarà il seguente: 
1 


Anche in questo caso il risultato dell’operazione sarebbe 2 con il resto di 1, 
ma siccome viene usato l’operatore MOD, QBasic scarta la parte intera del ri- 
sultato conservando solo il resto. 


L’operatore /* (esponente) 


L’operatore esponente (/\) vi consente di eseguire operazioni di elevamento a 

i i A: AME ; A 
potenza; per esempio, l’equivalente di 10° (dieci alla terza) viene espresso in 
questo modo: 


TOS 
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| Regole. diverse, per la divisione 


LU ‘operatore della divisione normale 1) restituisce ù risultato completo; _ . 


- per esempio l’enunciato seguente restituirebbe 198 stesso risultato di Una 
normale calcolatrice: 2... |. \/]/z_.- _. _° 


COPRINT 5/2. 


— Gli \.. e MOD u usano dl metodo di i divisione più tradizionale, di 
stinguendo i tra ii intera e resto. |’ | _... 


Esercizio: Uso dell’operatore 

Digitate la riga seguente nella Finestra Immediato: 
PRINT 10 * 3 

Il risultato sarà il seguente: 


1000 


Espressioni numeriche 


Un’espressione numerica, comunemente detta formula, è una combinazione 
di numeri, variabili, operatori e funzioni numeriche che insieme producono 
un risultato. Gli esercizi sulla moltiplicazione, sulla divisione e sull’eleva- 
mento a potenza possono essere considerati come semplici esempi di espres- 
sioni numeriche. 

QBasic permette di creare un’ampia gamma di espressioni numeriche, da 
quelle più semplici a quelle più elaborate; la creazione di queste espressioni 
non è complicata e basta tenere a mente alcune semplici regole per essere in 
grado di effettuare qualsiasi tipo di calcolo. 


Usare più di un operatore 


Negli esempi appena visti si usavano operatori singoli ma QBasic permette 
anche di usare più di un operatore nella stessa espressione numerica per effet- 
tuare più calcoli allo stesso tempo. 
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Esercizio: Uso di più operatori 
Digitate la riga seguente nella Finestra Immediato: 
PRINT 14 + 26 + 15.75 - 33.2 


Il risultato dell’operazione che appare nello schermo di output sarà quello 
mostrato di seguito: 


22.55 


La Finestra Immediato può quindi essere molto utile anche come calcolatrice! 


Ordine di calcolo 


QBasic rispetta un rigoroso insieme di regole nel calcolare un’espressione 
numerica che contiene più di un operatore. Si consideri il seguente esempio: 


dt 45 


Qual è il risultato? In effetti ci sono due diversi risultati a seconda di come il 
calcolo viene eseguito: se si esegue prima l’addizione il risultato è 35, altri- 
menti (cioè se si esegue prima la moltiplicazione) è 23. 

Per evitare confusione, QBasic esegue i calcoli nell’ordine seguente: 


es L’elevamento a potenza (/) viene eseguita per prima 
8 La moltiplicazione e la divisione (*, /\, MOD) per seconde. 
& L'’addizionee la sottrazione (+ e -) per ultime. 


Queste regole non coprono però tutte le circostanze: che cosa succede per 
quelle operazioni i cui operatori hanno lo stesso “livello di importanza”? Per 
esempio: 


375 MOD" 
oppure 
100 / 4 * 3 


In questi casi QBasic esegue i calcoli da sinistra verso destra. 
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Esercizio: Lavorare con l’ordine di precedenza degli operatori 
Digitate la riga seguente nella Finestra Immediato: 

PRINT 3 +4* 5 

Il risultato dell’operazione sarà il seguente: 

23 


Poiché QBasic esegue la moltiplicazione prima dell’addizione il risultato sarà 
23. Premete un tasto qualsiasi per tornare nella Finestra Immediato e scrivete 
questo enunciato: 


PRINT 100 / 4 * 3 
Il risultato dell’operazione che appare nello schermo output sarà il seguente: 


75 


Siccome la divisone (/) e la moltiplicazione (*) hanno lo stesso ‘“peso” — 
cioè la stessa priorità — QBasic calcola l’espressione da sinistra a destra. 


Uso di parentesi per controllare l’ordine di calcolo 


Consideriamo l’espressione numerica precedente: 
Sta 


Come abbiamo visto, QBasic esegue la moltiplicazione prima dell’addizione, 
dando 23 come risultato. Che cosa succede se si vuole calcolare l’addizione | 
prima della moltiplicazione? 

QBasic permette di controllare l’ordine di calcolo di un'espressione nu- | 
merica attraverso l’uso di parentesi: le operazioni tra parentesi verranno infat- o 
ti calcolate prima delle altre. Nell’esempio seguente il risultato è pari a 35 
perché QBasic calcola ciò che è contenuto nelle parentesi prima degli altri 
elementi dell’espressione: 


(3+4) * 5 


Per l’esecuzione di calcoli all’interno delle parentesi QBasic segue le stesse 
regole viste in precedenza. Per esempio, l’espressione seguente avrà un risul- 
tato pari a 23: 


(3:47) o 
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Esercizio: Uso delle parentesi per controllare l’ordine di calcolo 


1. Scrivete quest’enunciato nella Finestra Immediato: 
PRINT 3+4*5 
Il risultato dell’output del programma sarà: 


23 


2. Premete un tasto qualsiasi per tornare nella Finestra Immediato e scrivete 
quest'altro enunciato 


PRINT (3+4) *5 
Il risultato questa volta sarà diverso: 


35 


Uso di parentesi dentro altre parentesi 


Per l’esecuzione di operazioni più complesse QBasic permette l’uso di paren- 
tesi annidate — cioè di parentesi inserite dentro altre parentesi. 
Considerate la seguente espressione numerica: 


Did 3 SZ 


QBasic calcolerebbe prima l’esponente, poi la moltiplicazione e, per ultima, 


l’addizione. Come fare nel caso si voglia eseguire prima l’addizione, poi la 


moltiplicazione e, infine l’esponente? Si consideri questa espressione: 

(2/9: 30) 2 

In questo caso QBasic calcolerebbe per prima cosa il contenuto delle parente- 
si e per ultimo l’esponente; la moltiplicazione verrebbe ancora eseguita prima 


dell’addizione. Per risolvere questo problema si possono usare due parentesi 
annidate: 


((24+3) * 4) © 2 


QBasic calcola prima i contenuti delle parentesi interne e poi quelli delle pa- 
rentesi esterne. In questo esempio l’addizione verrebbe calcolata per prima, 
seguita dalla moltiplicazione e dall’esponente. 
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Funzioni matematiche di QBasic 


Come abbiamo visto nel terzo capitolo, una funzione restituisce un certo va- 
lore al programma. QBasic dispone di molte funzioni matematiche (che, co- 
me tutte le funzioni di QBasic, devono essere usate in un enunciato). 

Il simbolo n nella tabella successiva indica il numero, la variabile nume- 
rica o l’espressione che si vuole venga eseguita dalla funzione. Si noti che la 
n è posta tra parentesi: queste devono essere usate quando l’argomento di una 
funzione è un valore. | 


Esercizio: Lavorare con funzioni numeriche 
Scrivete quest’enunciato nella Finestra Immediato: 


PRINT SQR(36) 


Il risultato dovrebbe essere la radice quadrata di 36: 


6 

Funzione Scopo 

ABS(n) Restituisce il valore assoluto di n 

ATN(n) Restituisce l’arcotangente di n in radianti 

COS(n) Restituisce il coseno dell’angolo n espresso in radianti 

EXP(n) Restituisce il logaritmo di n 

SGN(N) Restituisce —1 se n è inferiore a zero, 0 se n è zero e +1 
se n è maggiore di zero 

SIN(n) Restituisce il seno dell’angolo n espresso in radianti 

SQR(N) Restituisce la radice quadrata di n 

TAN(n) Restituisce la tangente dell'angolo n espressa in radianti 


Uso di funzioni matematiche in espressioni numeriche 


È possibile usare funzioni matematiche in espressioni numeriche insieme con 
altri operatori di QBasic. Nell’esempio che segue la funzione SQR risolve un 
problema che riguarda un triangolo retto. 


Esercizio: Uso della funzione SOR 


Supponiamo di avere un palo alto 2,25 metri e un supporto di metallo pianta- 
to nel terreno a 4 metri dalla base del palo stesso (figura 4-4); vogliamo tirare 
un cavo dalla cima del palo al supporto metallico, ma non sappiamo esatta- 
mente quanto cavo comprare. 
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Si può scrivere un semplice programma in QBasic per calcolare la lun- 


ghezza usando la funzione SQR; la formula da usare per questo calcolo è la 
seguente: 


TZ 


\ altezza? + lunghezza” 


Premete il tasto funzione F6 per attivare la Finestra di digitazione 


Selezionate Nuovo dal menu File e scrivete questo programma: 
CLS 


PRINT "Questo programma calcola quanto cavo è necessario" 
PRINT "dalla cima del palo al supporto metallico sul terreno" 
PRINT 

INPUT "Inserire l'altezza del palo inmetri: ", altezza! 
PRINT 

PRINT "Inserire la lunghezza dalla base del palo" 

INPUT "al supporto metallico in metri: ", lunghezza! 


cavo! = SQR((altezza! * 2) + (lunghezza! 2 2)) 


PRINT 
PRINT "Avete bisogno di"; cavo!; "metri di cavo." 


Eseguite il programma e inserite l’altezza e la lunghezza indicate nella fi- 
gura 4-4 (2.25 e 4); il risultato sarà il seguente: 


Questo programma calcola quanto cavo è necessario 
dalla cima del palo al supporto metallico sul terreno 


Inserire l'altezza del palo in metri: 2.25 


Inserire la lunghezza dalla base del palo 
al supporto metallico in metri: 4 


Avete bisogno di 4.58939 metri di cavo. 
Si noti che il programma usa delle variabili in virgola mobile a precisione 


singola; usando questo tipo di variabile non si costringe l’utente a usare 
soltanto numeri interi. 
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Quanio cavo è necessario? 


L'altezza del palo 


è 2,25 metri. 


ii st _c__ rifT_ _r_ x c=—1 mr ____rnr_a 8" tf_—=.=. 
La lunghezza dalla base del palo al supporto metallico è 4 metri. 


Figura 4-4. Come trovare la lunghezza di un cavo. 


Si noti anche che la riga seguente 
cavo! = SQR((altezza! * 2) + (lunghezza! * 2)) 


usa parentesi annidate. Viste le regole di calcolo di QBasic, si può osser- 
vare che in questo caso le parentesi non sono assolutamente necessarie e 
che si otterrebbe lo stesso risultato anche senza. L’uso delle parentesi può 
contribuire a rendere le formule più facili da leggere. 


4. Eseguite il programma di nuovo, usando altri valori per l’altezza e la lun- 
ghezza (ricordate che il programma non tiene conto della lunghezza ne- 
cessaria per legare il cavo al palo e al supporto metallico). 


NOTA: Se avevate incluso le misure all’interno del pro- 
gramma, come in questo caso, 


altezza! = 2.25 
lunghezza! = 4 


dovrete naturalmente modificare il programma stesso se volete usa- 
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re delle misure diverse. E chiaro perciò che se si lascia che sia l’ u- 
tente a inserire le misure, il programma può essere eseguito più vol- 
te senza doverlo modificare. 


L’ENUNCIATO CONST 


Quando si ha un valore che non cambia mai nel programma (per esempio una 
tassa o un tasso di sconto) lo si può dichiarare come costante con l’enunciato 
CONST. 

L'uso di questo enunciato è molto semplice perché basta inserire la paro- 
la chiave CONST davanti alla dichiarazione della costante. Per esempio, l’e- 
nunciato seguente dice a QBasic che la costante in virgola mobile a 
precisione singola chiamata TASSO! rappresenterà sempre un valore pari a 
0.081: 


CONST TASSO! = 0.081 


Se si prova ad assegnare a TASSO! un altro valore in un altro punto del pro- 
gramma, QBasic mostra la seguente finestra di dialogo al momento dell’ese- 
cuzione: 


Def inizione doppia 


| Bo <uidoò | 


Esercizio: Dichiarazione di costanti con l’enunciato CONST 


Supponiamo di voler calcolare il prezzo reale di uno o più oggetti — cioè il 
prezzo senza tasse di vendita — usando un semplice programma scritto con 
QBasic. 


1. Selezionate il comando Nuovo dal menu File. 


2. Scrivete ed eseguite il seguente programma: 
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CLS 


CONS TASSO! = 0.081 " Tassa sulle vendite 


INPUT "Inserire il prezzo dell'oggetto: L", prezzo! 


tassa! = prezzo! * TASSO! Calcola l'ammontare della tassa 
totale! = prezzo! + tassa! " Calcola il costo totale 


PRINT 

PRINT "Il costo dell'oggetto è L"; prezzo! 

PRINT "Le tasse di vendita sono L": tassa! 

PRINT "-----------------222----202--000=------ Ù 
PRINT "I] costo totale é L."; totale! 


Il risultato che appare sullo schermo di output sarà: 
Inserire il prezzo dell'oggetto: L 2500 


Il costo dell'oggetto è L 2500 
Le tasse di vendita sono L 202.5 


Il costo totale è L 2702.5 


Potete eseguire questo programma tutte le volte che volete e vi accorgerete 
che risulterà molto più semplice e veloce di una calcolatrice. 

Questo programma dimostra anche che si possono usare variabili e co- 
stanti per creare nuove variabili. Notate queste due righe: 


tassa! = prezzo! * TASSO! ' Calcola l'ammontare della tassa 
totale! = prezzo! + tassa! ' Calcola il costo totale 


Come potete vedere queste espressioni contengono solamente variabili nume- 
riche e costanti. Siccome QBasic tratta le variabili numeriche come se fossero 
numeri, esse possono essere usate ovunque si possa usare normalmente un 
numero. 
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SOMMARIO 


In questo capitolo abbiamo visto alcuni concetti fondamentali per poter impa- 
rare a programmare in QBasic: le variabili (stringa e numeriche) e gli opera- 
tori sono infatti elementi indispensabili per la creazione di programmi. Nel 
prossimo capitolo cercheremo di dotare i programmi di un po’ di “intelligen- 
za”, cioè della possibilità di prendere decisioni in base a regole prefissate. 


DOMANDE ED ESERCIZI 
1. Quali sono i quattro tipi di variabili numeriche e in che cosa differisco- 
no? 


2. Perché QBasic inserisce uno spazio davanti ai numeri positivi? 


3. Che cosa significa quando QBasic mostra un finestra di dialogo con il 
messaggio “Era atteso: variabile”? 


4. Che cosa significa quando QBasic mostra una finestra di dialogo o un 
messaggio di errore “Overflow?”?? 


5. Che tipo di variabile usereste per ciascuno di questi numeri? 


a. -32679 d. 14.000001 g. 268110 
b. 12.3774 e. -1286.0 h. -10.222222 


c. 142286.9 f. -268.0005 î. -0.0000001 


6. Che differenza c’è tra la divisione regolare e l’operatore /, tra la divisione 
intera e l’operatore \, tra la divisione con resto e l’operatore MOD? 


7. In ordine di priorità qual è l’ordine di precedenza che QBasic applica agli 
operatori matematici? 


6. Qualè il risultato di questo calcolo? 
((CK5s8)e (#34) ((752):372)) 


9. Scrivete un programma (completo di commenti) per calcolare i seguenti 
valori: 


ABS(-10) + 5 
SOR(36) 
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SQR(4) © 2 
C0S(3.141592654) 


Il valore della costante matematica pi greco è circa 3.141592654. La for- 
mula per il calcolo della circonferenza è: 

2* TT * raggio 

Scrivete un programma che chieda all’utente la misura del raggio del cer- 
chio e restituisca la circonferenza. 


(FACOLTATIVA) Volete mettere su una rete da pallavolo. Supponiamo 
che l’altezza del palo da terra sia di 2.5 metri e che il cavo attaccato alla 
cima del palo sia lungo 4.5 metri: 


La lungezza del cavo è 4.5 metri 


L'altezza del palo 
è 2.5 metri. 


lt i °_——__—.-rr-\——r——————__ 
Quale deve essere la distanza tra la base del palo e il supporto da piantare? 


La formula da usare per calcolare la distanza dalla base del palo al sup- 
porto dovrebbe essere 


V lunghezza (cavo)? - altezza” 


Scrivete un programma che chiede all’utente di inserire l’altezza del palo 
e la lunghezza del cavo per restituire, come risultato, la distanza tra la ba- 
se del palo e il supporto da piantare nel terreno per sostenerlo. 


TI 


FAL 


È 


SERA MO 


| 
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I programmi scritti fino ad ora sono tutti eseguibili in maniera molto diretta: 
QBasic passa cioè progressivamente dalla prima all’ultima istruzione. A_vol- 
te, tuttavia, può capitare di voler eseguire certe porzioni del programma solo 
in presenza di determinate circostanze. Questo capitolo mostra come avviene 
questo tipo di programmazione. 


INTRODUZIONE AL PROCESSO DECISIONALE 


Ogni giorno ciascuno di noi prende decisioni; alcune richiedono la valutazio- 
ne di una serie di opzioni, altre si prendono quasi senza pensarci. 

Alcune decisioni possono condurre a un insieme di azioni; per esempio 
se state facendo un lungo viaggio in macchina dovete assicurarvi di non re- 
stare senza benzina. Proviamo dunque ad esaminare un tipico processo deci- 
sionale, come quello che fareste ogni volta che controllate l’indicatore del 
livello del carburante. 

Come mostra il grafico nella pagina successiva, per prima cosa controlla- 
te la quantità di benzina nel serbatoio: se è pieno continuate a guidare, altri- 
menti vi fermate a una stazione per fare il pieno. Allo stesso modo decidete 
se farvi pulire il parabrezza oppure no: se è pulito pagate e riprendete il vo- 
stro viaggio, se è sporco chiedete all’addetto di pulirvelo prima di pagare e ri- 
partire. È facile capire come una sola decisione, basata sulla risposta alla 
domanda “Ho abbastanza benzina?”, vi porti a scegliere di fare o meno una 
certa altra cosa e a prendere un'ulteriore decisione se necessario. 


Processo decisionale in QBasic 


QBasic permette di inserire nel programma dei punti decisionali; si può cioè 
inserire un enunciato “interrogativo” completo di istruzioni che dicono a 
QBasic che cosa fare a seconda della risposta ottenuta. Quando QBasic in- 
contra una di queste domande, ne determina la risposta: se la risposta è SÌ, 
viene attivato un certo gruppo di azioni, se è no un altro. 

QBasic agisce sempre in base alle istruzioni date e ammette solo due ri- 
sposte alle domande: sì e no. 


Condizioni Vero e Falso 


In un programma in QBasic le domande vengono poste attraverso espressioni 
condizionali e QBasic valuta queste espressioni non per determinare una ri- 
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sposta del tipo “sì o no” ma per vedere se sono Vere o False (True o False). 


Creazione di espressioni condizionali 


Per creare espressioni condizionali (booleane) in un programma bisogna usa- 
re un operatore relazionale, un operatore logico o una loro combinazione. 
QBasic mette a disposizione i seguenti operatori relazionali: 


Operatore relazionale 


Significato 
= Uguale a 
<> Non uguale a 
> Maggiore di 
“ Minore di 
eli Maggiore o uguale a 
“ua Minore o uguale a 


Questa tabella mostra alcuni esempi di espressioni condizionali che usa- 
no operatori relazionali e 1 loro risultati: 
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Condizione Risultato 


e n ra ani o i dior, z-=-o "1 Shu 
TL Vero (3 è inferiore a 7) 

14>=22 Falso (14 non è maggiore o uguale a 22) 

11<> 16 Vero (11 non è uguale a 16) 

5=-5 Falso (5 non è uguale a —-5) 

12> 14 Falso (12 non è maggiore di 14) 

11>=11 Vero (11 è maggiore o uguale a 11) 


Vero se il valore di totale% è minore a 5; 
falso negli altri casi 

Vero se il valore di num1% è uguale al valore 
di num2%; falso negli altri casi 


_ _ — _ ° ——6c-F6—tr1161—____rrrrr r rr_ ww 


totale% < 5 


numi% = num2% 


Fra un po’ vedremo alcuni esercizi che utilizzano operatori relazionali e 
espressioni condizionali, prima però diamo un'occhiata agli enunciati di 
QBasic che permettono di usare espressioni condizionali nei programmi. 


L’ENUNCIATO IF 


L’enunciato IF permette di valutare una condizione e, insieme con la clausola 
THEN, di prendere un certo corso di azione in base alla valutazione effettua- 
ta. Nella forma più semplice IF e THEN formano un solo enunciato, con la 
seguente sintassi: 


IF condizione THEN enunciato 
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La condizione è una delle espressioni condizionali appena viste; l’enunciato è 
un’altra istruzione di QBasic che viene eseguita solo se la condizione è vera; 
se la condizione è falsa QBasic ignora l’enunciato collegato e passa alla riga 
successiva del programma. Ecco un esempio: 


Se questa condizione è vera QBasic eseguirà questa istruzione. 


| 


IF numUtente% > 1000 THEN PRINT "Il numero è troppo grande!" 


Se questa condizione è falsa QBasic 
ignora il resto della riga ed esegue la 


successiva istruzione del programma. 


L’enunciato dopo THEN può essere un qualsiasi enunciato di QBasic ma ri- 
cordate che viene eseguito soltanto se la condizione che lo precede è vera. 


Esercizio: uso dell’enunciato IF 
1. Scrivete edeseguite il programma IF-1.BAS (figura 5-1): 


2. Se alla domanda rispondete 11, l’output del vostro programma sarà que- 
sto: 


Quanti giocatori formano una squadra di calcio? 11 
Esatto!! 


Una squadra di calcio è formata da 11 giocatori 


Se scrivete 11 la condizione del primo enunciato IF è vera e perciò QBa- 
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Figura 5-1. IF-1.BAS: un programma che mostra l’uso dell’enunciato IF. 


sic esegue l’enunciato PRINT alla fine della riga. Invece, la seconda con- 
dizione IF è falsa e QBasic non esegue il relativo enunciato PRINT. 


3. Eseguite il programma inserendo un numero diverso da 11; in questo ca- 
so otterrete il seguente risultato: 


Quanti giocatori formano una squadra di calcio? 13 
Sbagliato! La risposta è 11! 
Una squadra di calcio è formata da 11 giocatori 


Questa volta il numero digitato causa un diverso corso di azione; siccome 
13 non è uguale a 11 la prima condizione IF è falsa e QBasic non esegue 
l’enunciato THEN successivo. Si verifica invece la seconda condizione 
IF e perciò QBasic esegue l’enunciato THEN. 


Si noti che in entrambi i casi QBasic mostra l’ultimo enunciato PRINT (“Una 
squadra di calcio è formata da 11 giocatori”), il che dimostra che anche se la 
condizione in un enunciato IF è falsa QBasic esegue il resto del programma 
normalmente; questo avviene perché se la condizione non è vera, solo la parte 
che segue THEN viene ignorata. 


Uso di più condizioni con IF 


Nel programma precedente QBasic conteneva una sola condizione in ogni 
enunciato IF. In realtà è possibile inserire più condizioni in un enunciato IF 
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attraverso gli operatori AND e OR; questi operatori logici si possono usare in 
espressioni condizionali allo stesso modo in cui gli operatori matematici ven- 
gono usati in espressioni numeriche. 


L’operatore logico AND 


L'operatore logico AND consente di specificare un gruppo di condizioni che 
devono verificarsi affinché una certa azione venga intrapresa. Questa è la sin- 
tassi di un enunciato IF che usa l’operatore AND: 


IF condizionel AND condizione? THEN enunciato 


Sia la condizione! che la condizione2 devono essere vere perché l’enunciato 
possa essere eseguito. Eccovi un esempio: | 


IF numi% > 10 AND num2% < 20 THEN PRINT "Esatto!" 


| 


Se queste due condizioni sono vere, QBasic esegue l’enunciato; se 
una o entrambe queste condizioni sono false, QBasic ignora il resto 
della riga ed esegue l’enunciato successivo all’interno del programma. 


CREA 


Si noti che l’enunciato IF contiene due condizioni che essendo collegate dal- 
l’operatore AND devono essere entrambe vere (num1% maggiore di 10 e 
num2% minore di 20) affinché QBasic possa eseguire l’enunciato PRINT che 
segue il THEN. 


Esercizio: Uso dell’operatore AND 
1. Scrivete edeseguite il programma IF-2.BAS (figura 5-2) 
2. Scrivete 10 come risposta e otterrete questo risultato: 


Quante persone può contenere una cabina telefonica? 10 


Esatto!! 
A seconda della loro corporatura, da 10 a 12 
persone possono stare in una cabina telefonica. 
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Esercizio: Uso dell’operatore OR 
a 28 1. Scrivete ed eseguite il programma IF-3.BAS (figura 5-3). 


Figura 5-2. Un programma che mostra l’uso dell'operatore logico AND. 


10 è una risposta che verifica entrambe le condizioni contenute nell’e- 
nunciato IF. Se provate a eseguire nuovamente il programma e a dare co- 
me risposta un valore inferiore a 10 o superiore a 12 una delle due Figura 5-3. Un programma che dimostra l’uso dell’ operatore logico OR. 
condizioni sarà falsa e QBasic non eseguirà l’enunciato PRINT collegato. 


2. Eseguite il programma. Scrivete il numero 63 a cui il programma ‘sta 


L’operatore logico OR i pensando” e lo schermo output apparirà in questo modo: 
L’operatore logico OR permette di creare un insieme di condizioni più flessi- 

bili che si devono verificare affinché una data azione venga eseguita. La sin- Sto pensando a un numero tra 1 e 100. 

tassi di un enunciato IF contenente l’operatore OR appare nel modo seguente: i Puoi indovinare che numero è? 

IF condizionel OR condizione? THEN enunciato Scrivi un numero tra 1 e 100: 63 

Si noti che l’enunciato IF contiene due condizioni di cui soltanto una deve Esatto! 


verificarsi prima che QBasic possa eseguire l’enunciato che segue THEN. 
Naturalmente questa viene eseguita anche nel caso in cui entrambe le condi- 
zioni siano vere. Eccovi un esempio: 3. 


Grazie per aver giocato! 


Eseguite il programma nuovamente usando un numero inferiore a 53 o 
superiore a 73 e osservate il risultato: 


% ite > EN PRINT "Ben fatto!" 
SIPRGHO Fa A OE DI ENI ee ANO Sto pensando a un numero tra 1 e 100. 
L sila Puoi indovinare che numero è? 
| l Scrivi un numero tra 1 e 100: 76 
Se una di queste due condizioni è vera, QBasic esegue l’enunciato; 


se entrambe queste condizioni sono false, QBasic ignora il resto della 
riga ed esegue l’enunciato successivo all’interno del programma. Sbagliato! 


Grazie per aver giocato! 
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Osservate il secondo enunciato IF: inserendo un numero superiore o inferiore 
di 11 unità a quello a cui il programma “sta pensando” si ottiene il messaggio 
“Sbagliato!” 


L’operatore logico NOT 


L’operatore logico NOT permette di negare una condizione: se una condizio- 
ne è falsa la rende vera, se è vera la rende falsa. La sintassi di questo operato- 
re è strutturata in questo modo: 


IF NOT condizione THEN enunciato 


NOT è utile per eseguire un enunciato quando una data condizione non è ve- 
ra. Osservate questo esempio: 


IF NOT anni& >= 18 THEN PRINT "Non puoi votare" 


i 


Se questa condizione è falsa QBasic esegue l’enunciato. 
Se la condizione è vera QBasic ignora il resto della riga 
ed esegue la successiva istruzione del programma. 


Uso di ELSE con IF e THEN 


Abbiamo visto come far in modo che QBasic valuti una condizione ed esegua 
una certa azione se la condizione è vera o falsa. Che cosa succede se si vuole 
che QBasic scelga tra due azioni basate su una data condizione? 

L’operatore ELSE usato con IF e THEN permette di indicare due azioni 
separate: una (quella che segue THEN) da eseguire se la condizione è vera, 
l’altra (quella che segue ELSE) da eseguire se la condizione è falsa. 

La sintassi di un enunciato IF usato con THEN e ELSE appare in questo 
modo: 


IF condizione THEN enunciatol ELSE enunciato? 


Per condizione si intende la condizione logica che si vuole che QBasic valuti, 
enunciatol è l’enunciato eseguito se la condizione è vera e enunciato2 è l’e- 
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nunciato eseguito se la condizione è falsa. IF, THEN e ELSE devono essere 
tutti contenuti sulla stessa riga: 


Se questa condizione è vera QBasic esegue questo enunciato. 


Î 


IF numUtente% > 100 THEN PRINT "Vero" ELSE PRINT "Falso" 


| A, 


Se questa condizione è falsa QBasic esegue questo enunciato. 


Esercizio: Uso di IF, THEN e ELSE 
1. Scrivete ed eseguite il programma IF-4.BAS (figura 5-4). 


Figura 5-4. Un programma che mostra l’uso della clausola ELSE. 


2. Eseguite il programma inserendo il numero 3 e avrete questo risultato: 
Sto pensando a un numero tra 1 e 5. 
Puoi indovinare che numero è? 


Scrivi un numero tra 1 e 5: 3 


Esatto! 
Grazie per aver giocato! 
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Il numero 3 verifica la condizione e QBasic esegue l’enunciato PRINT 
che segue THEN. 


3. Eseguite il programma inserendo un numero diverso da 3 e otterrete in- 
vece quest'altro risultato: 


Sto pensando a un numero tra 1 e 5. 
Puoi indovinare che numero è? 
Scrivi un numero tra le 5: 4 


Sbagliato! 
Grazie per aver giocato! 


Questa volta la condizione non è verificata e QBasic esegue l’enunciato 
che segue ELSE. 


Creazione di enunciati condizionali più lunghi usando END IF 


L’uso di ELSE assieme a IF e THEN permette a QBasic di scegliere tra due 
opzioni sulla base della valutazione di una certa condizione. Tuttavia, il fatto 
che queste informazioni debbano essere racchiuse in una sola riga non lascia 
molto spazio alla creatività. 

In questo caso si può usare l’enunciato END IF, che permette di creare 
programmi più lunghi, collocando azioni diverse su righe separate. La sintassi 
dell’enunciato IF usata con THEN, ELSE e END appare nel modo seguente: 


IF condizione THEN 

enunciati eseguiti se la condizione è vera 
ELSE 

enunciati eseguiti se la condizione è falsa 
ENDIF 


Questo tipo di enunciato IF consiste di più righe singole, dette blocco. La 
condizione è l’espressione condizionale che QBasic deve valutare; la parola 
chiave THEN chiude la riga (si noti che THEN deve sempre trovarsi sulla 
stessa riga di IF). Se la condizione è vera QBasic: 


1. Esegue glienunciati tra THEN e ELSE. 
2. Ignora gli enunciati tra ELSE e END IF. 


3. Continua a eseguire il programma. 
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Tra THEN e ELSE è possibile inserire un numero qualsiasi di enunciati. 
Se la condizione è falsa QBasic: 


1. Ignora gli enunciati tra THEN e ELSE. 
2. Esegue gli enunciati tra ELSE e END IF. 
3. Continuaa eseguire il programma. 


Tra ELSE e END IF è possibile inserire un numero qualsiasi di enunciati. 
Vediamo un esempio: 


IF scelta% = "SI" THEN 
PRINT "Si' signore! Questo modello fa proprio per voi" 
PRINT "Veloce, scattante, un vero divertimento!" 
ELSE 
PRINT "Forse Le interessa un altro tipo di vettura" 
PRINT "moderna, elegante e comoda come un salotto!" 
END IF 


Si noti che il rientro tipografico degli enunciati correlati permette di dare 
maggiore chiarezza al programma. 


Esercizio: Uso di IF, THEN, ELSE e END IF 
1. Scrivete ed eseguite il programma IF-5.BAS (figura 5-5). 


2. Eseguite il programma e rispondete 1885, valore che rende vera la condi- 
zione che segue IF; il risultato sarà il seguente: 


Benvenuto al quiz dell'automobile! 


In quale anno Kar] Friedrich Benz guidò per la prima 
volta con successo un'automobile a benzina? 1885 


Esatto! Sei proprio un esperto! 
Grazie per aver giocato! 


3. Ora eseguite il programma usando un anno diverso da 1885 e otterrete 
questo risultato sul vostro schermo output: 


Benvenuto al quiz dell'automobile! 


In quale anno Kar] Friedrich Benz guidò per la prima 
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Li Ir 5. BASO 


Figura 5.5. Un programma che dimostra l’uso di un blocco IF. 


volta con successo un'automobile a benzina? 1875 


Sbagliato! Accadde a Mannheim, in Germania, 
nel 1885 (la brevettò il 29 gennaio 1886). 
Grazie per aver giocato! 


Come potete vedere l’uso di END IF con IF, THEN e ELSE vi permette di 
usare interi blocchi di enunciati. 


La parola chiave ELSEIF 


ELSEIF è simile a ELSE perché fornisce un corso di azione alternativo nel 
caso in cui la condizione sia falsa; ELSEIF introduce però anche una condi- 
zione ulteriore da valutare. 

La sintassi di un enunciato IF con ELSEIF è strutturata in questo modo: 
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IF condizione! THEN 
Enunciati eseguiti se la condizione 1 è vera 
ELSEIF condizione? THEN 
Enunciati eseguiti se la condizione 2 è vera 
ELSEIF condizione3 THEN 
Enunciati eseguiti se la condizione 3 è vera 
ELSE 
Enunciati eseguiti se tutte le condizioni sono false 
ENDIF 


I puntini tra l’ultima riga ELSEIF e ELSE indicano che si possono avere più 
enunciati ELSEIF seguite da altre condizioni e non c’è limite al numero di 
enunciati ELSEIF e di condizioni associate che si possono usare. 


NOTA: Bisogna sempre usare THEN alla fine di un 
enunciato ELSEIF, mentre l’uso di ELSE è opzionale (in 
questo caso è stato incluso per mostrarne la collocazio- 
ne nel caso in cui lo si voglia includere). 


Se la condizione1 è vera QBasic: 


1. Esegue gli enunciati contenuti nelle righe seguenti fino a che incontra il 
primo ELSEIE. 


2. Passaall’istruzione END IF. 
3. Continuaa eseguire il programma. 


Se la condizione1 è falsa QBasic passa alla prima istruzione ELSEIF e 
valuta la condizione2; se questa è vera QBasic: 


1. Esegue gli enunciati contenuti nelle righe seguenti fino a incontrare l’i- 
struzione ELSEIF successiva o la clausola ELSE. 


2. Passaall’istruzione END IF e continua a eseguire il programma. 


Se la condizione associata a ELSEIF è falsa QBasic passa a quella suc- 
cessiva e ne valuta la condizione; questo processo viene ripetuto fino a che 
trova un enunciato ELSEIF vero o un enunciato ELSE. 

Osservate questo esempio: 


IF scelta% = 1 THEN 

PRINT "Grazie per aver scelto l'opzione 1!" 
ELSEIF scelta% = 2 THEN 

PRINT "Grazie per aver scelto l'opzione 2!" 
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ELSEIF scelta% = 3 THEN 

PRINT "Grazie per aver scelto l'opzione 3!" 
ELSE 

PRINT "Non avete scelto 1, 2 o 3" 
END IF 


Si noti che l’uso di ELSEIF permette di specificare diverse condizioni e di- 
versi corsi di azione possibili. 


Esercizio: Uso di ELSEIF 
1. Scrivete il programma ELSEIF.BAS (figura 5-6). 


2. Eseguite il programma e inserite l’anno 1959; lo schermo output dovreb- 
be apparire in questo modo: 


Benvenuti al quiz cinematografico 
In quale anno il film Ben Hur ha vinto 
l'Oscar come miglior film? 


Scrivete un anno compreso tra il 1950 e il 1959: 1959 
Esatto! Ben Hur, diretto da WilliamWyler, 


vinse 11 Oscar nel 1959, compreso quello 
per il miglior film. 


3. Eseguite il programma di nuovo ma questa volta inserite un anno diverso; 


il risultato sarà il seguente: 


Benvenuti al quiz cinematografico 
In quale anno il film Ben Hur ha vinto 
l'Oscar come miglior film? 


Scrivete un anno compreso tra il 1950 e il 1959: 1950 


Sbagliato! Nel 1950 1'Oscar per il miglior filmè stato 
vinto dal film Eva contro Eva. 


4. Infine eseguite il programma inserendo un anno non compreso nell’inter- 
vallo tra il 1950 e il 1959; il risultato che otterrete sarà il seguente: 
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| PRINT "Sbagliato! Nel 1952 | 
Gr "vinto dal film Il pi 


Figura 5-6. Un quiz cinematografico che usa ELSEIF (continua). 
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PRINT "Esatto! Bi Ben iu diretto da William Wyler, LI _._. i 
| PRINT "vinse. ll Oscar nel 1959, compreso, quello" . 
. per il miglior film.' __- Lr... 


PRINT "IT Ue ta: non ompreso. .- n 1950 e sil 1959. n. 
| PRINT “Eseguite. il programma di dos. e * inserite un. - 
PRINT “numero. appropriato! _mm@— . 


Figura 5-6. Un quiz cinematografico che usa ELSEIF. 


Benvenuti al quiz cinematografico 
Inquale anno il film Ben Hur ha vinto 
l'Oscar come miglior film? 


Scrivete un anno compreso tra i] 1950 e il 1959: 1980 


I] numero inserito non è compreso tra i1 1950 e il 1959. 
Eseguite il programma di nuovo e inserite un 
numero appropriato! 


L’ENUNCIATO SELECT CASE 


Un altro strumento per lavorare con enunciati condizionali è l’enunciato SE- 
LECT CASE, che svolge una funzione molto simile a quella di IF. In molte 
occasioni questi due enunciati possono essere usati indifferentemente, ma in 
realtà ciascuno di essi si adatta meglio a determinate circostanze. 


Le parole chiave CASE e END SELECT 


Anche l’enunciato SELECT CASE, come IF, deve essere usato in congiun- 
zione con alcune parole chiave, specificatamente CASE e END SELECT. 
Di seguito appare la sintassi di SELECT CASE: 


SELECT CASE variabile 
CASE valorel 
enunciati da eseguire se il valorel e la variabile sono uguali 
CASE valore? 
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enunciati da eseguire se il valore2 e la variabile sono uguali 
CASE valore3 
enunciati da eseguire se il valore3 e la variabile sono uguali 


END SELECT 


A differenza di IF, un enunciato SELECT CASE completo non può essere 
contenuto in una sola riga ma deve essere strutturato in un blocco. 

variabile può essere una variabile numerica o una stringa e può essere vi- 
sta come la porta per le clausole CASE (QBasic usa il valore di variabile per 
determinare quale clausola CASE usare). 

Le clausole CASE sono enunciati condizionali separati, il cui valore è 
correlato a variabile. Si noti che non c’è limite al numero di singole clausole 
CASE che si possono inserire tra SELECT CASE e END SELECT. 

Ogni clausola CASE è seguita da uno o più enunciati che QBasic esegue 
se il valore della clausola e quello della variabile che segue SELECT CASE 
sono uguali. Ecco un esempio: 


SELECT CASE indovina% 


CASE 1 

PRINT "Spiacente, 1 non è il numero esatto." 
CASE 2 

PRINT "Spiacente, 2 non è il numero esatto." 
CASE 3 

PRINT "Esatto! 3 è il numero esatto!" 
CASE 4 


PRINT "Spiacente, 4 non è il numero esatto." 
END SELECT 


Quando QBasic si trova di fronte un enunciato SELECT CASE, prende nota 
del valore della variabile (in questo esempio il valore di indovina%) e poi 
esamina il valore specificato nella prima clausola CASE. 

Se questo valore è uguale a quello della variabile, QBasic: 


1. Esegue gli enunciati che seguono CASE fino a che incontra la clausola 
CASE successiva o l’enunciato END SELECT. 


2. Passaall’enunciato che segue END SELECT e continua con l’esecuzione 
del programma. 
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Se il valore della prima clausola CASE e della variabile non sono uguali, 
.QBasic controlla il valore di ogni clausola CASE successiva finché incontra 
quella giusta. 
Se nessuna delle clausole CASE è uguale al valore della variabile conte- 
nuta nell’enunciato SELECT CASE, QBasic passa all’enunciato che segue 
END SELECT e continua con l’esecuzione del programma. 


Esercizio: Uso dell’enunciato SELECT CASE 
e 1. Scriveteil programma SELECT-1.BAS (figura 5-7). 


: ", nomeUtei 


do __°’° 


Figura 5-7. Un programma che mostra l’uso di SELECT CASE (continua). 
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Figura 5-7. Un programma che mostra l’uso dell’ enunciato SELECT CASE. 


2. Eseguite il programma e otterrete un risultato simile a questo: 
Scrivete il vostro nome: Giovanni 


Congratulazioni, Giovanni! avete vinto la finale 
del gioco dei menu!!! Potete prendere un premio 
a vostra scelta: 


1. Porta Numero 1 | 
2. Cio che si trova dietro la tenda 
3. La grande scatola rosa 


Scrivete 1,203: 2 


** E' un buono spesa!!! ** 
Cinque milioni da spendere come 
volete, per voi e la famiglia!! 


Grazie per aver giocato! 


QBasic usa il valore di nomeMenu% per controllare il valore di ciascuna del- 
le clausole CASE. Poiché è stato inserito il numero 2, QBasic ha trovato cor- 
rispondenza nel valore della seconda clausola CASE ed ha eseguito gli 
enunciati associati con quella clausola. Un volta trovata corrispondenza in 
una delle clausole CASE, QBasic salta quelle rimanenti per eseguire il resto 
del programma. 
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3. Eseguite il programma di nuovo usando un valore diverso da 1, 2 o 3 e 
otterrete questo risultato: 


Scrivete il vostro nome: Andrea 


Congratulazioni, Andrea! avete vinto la finale 
del gioco dei menu!!! Potete prendere un premio 
a vostra scelta: 


1. Porta Numero 1 
2. Ciò che si trova dietro la tenda 
3. La grande scatola rosa 


Scrivete 1, 203: 5 


Grazie per aver giocato! 


Questa volta QBasic non mostra alcun messaggio correlato alla vincita di un 
premio perché non ha trovato alcuna corrispondenza tra il valore inserito e 
quelli contenuti nelle clausole CASE. 


Uso di CASE ELSE 


Abbiamo visto che, nel caso dell’enunciato IF, la clausola ELSE permette di 
specificare una o più azioni da eseguire quando le espressioni condizionali 
sono false. CASE ELSE svolge la stessa funzione per gli enunciati SELECT 
CASE. 

La sintassi per l’uso di questa clausola è la seguente: 


SELECT CASE variabile 
CASE valore 

enunciati da eseguire se il valore e la variabile sono uguali 
CASE ELSE 

enunciati da eseguire se il valore e la variabile non sono uguali 
END SELECT 
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Esercizio: Uso dell’enunciato CASE ELSE 


Figura 5-8. Un quiz cinematografico che usa CASE ELSE (continua). 
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Figura 5-8. Un quiz cinematografico che usa CASE ELSE. 


2. Eseguite il programma inserendo l’anno corretto e il vostro schermo ap- 
parirà in questo modo: 


Benvenuti al quiz sugli Oscar cinematografici! 
In quale anno il film Ben Hur ha vinto 
l'Oscar come miglior film? 


Scrivete un anno compreso tra i] 1950 e il 1959: 1959 
Esatto! Ben Hur, diretto da WilliamWyler, 


vinse 11 Oscar nel 1959, compreso quello 
per il miglior film. 


3. Provate ora a eseguire il programma inserendo un valore non compreso 
nell’intervallo definito e otterrete questo risultato: 


Benvenuti al quiz sugli Oscar cinematografici! 
In quale anno il film Ben Hur ha vinto 
l'Oscar come miglior film? 


Scrivete un anno compreso tra il 1950 e il 1959: 1958 


Non avete scritto un numero compreso tra 1950 e 1959. 
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Eseguite il programma di nuovo e inserite 
un numero appropriato! 


Siccome QBasic non ha trovato alcuna clausola CASE uguale alla variabile 
ha eseguito l’enunciato successivo a CASE ELSE. Perciò l’uso di CASE EL- 
SE consente di gestire situazioni non previste negli enunciati SELECT CA- 
SE. 


Uso di IS assieme a CASE 


La parola chiave IS permette di usare un’espressione condizionale (al posto 
di un valore numerico singolo o di una stringa) all’interno di una clausola 
CASE, per cui QBasic esegue gli enunciati che seguono quella clausola solo 
se la condizione è vera. La sintassi di una clausola CASE con IS è la seguen- 
te: 

SELECT CASE variabile 


CASE IS condizione 
enunciati da eseguire se la condizione è vera 


END SELECT 
Questa sintassi è identica al normale enunciato SELECT CASE, con l’ag- 
giunta della “condizione IS” alla clausola CASE. In questo caso QBasic usa il 


valore delle variabili SELECT CASE come base per il confronto. 
Ecco un esempio: 


SELECT CASE userNum% 
CASE IS <= 4 
PRINT "Il numero immesso è 4 o inferiore" 
CASE 5 
PRINT "Il numero immesso è 5" 
CASE IS >= 6 
PRINT "Il numero imesso è 6 o superiore" 
ENDSELECT 


QBasic confronta il valore digitato con le parti condizionali delle clausole 
CASE. In questo esempio se l’utente digitasse un valore uguale o inferiore a 
4, la condizione della prima clausola CASE sarebbe vera e QBasic eseguireb- 
be l’enunciato PRINT che gli è associato. Si noti che la seconda clausola CA- 
SE usa semplicemente un valore: valori ed espressioni condizionali IS 
possono essere mescolati. 
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Esercizio: Uso di SELECT CASE e IS 
1. Scrivete il programma SELECT-3.BAS (figura 5-9) 


Figura 5-9. Un programma che usa IS per analizzare il consumo di caffè.. 


2. Eseguitelo e inserite un valore; il vostro schermo output apparirà in que- 
sto modo: 


Quanti caffe hai bevuto oggi? 3 


Una quantità moderata. 


Premete un tasto per tornare nella Finestra di digitazione e osservate come 
vengono impostate le condizioni nel programma. Se scrivete 3, come abbia- 
mo fatto noi, risulta verificata la seconda clausola CASE; notate che tecnica- 
mente il valore 3 renderebbe vera anche la terza clausola e quindi ci si 
potrebbe chiedere perché QBasic non esegua l’enunciato PRINT associato. 
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A questo proposito ricordate che non appena QBasic trova una clausola CA- 
SE che verifica la condizione, salta tutte le altre clausole e continua con l’ese- 
cuzione del programma. 


Uso di TO con SELECT CASE 


Per specificare un intervallo di valori validi per una clausola CASE si usa la 
parola chiave TO, che presenta la seguente sintassi: 


SELECT CASE variabile 
CASE valore! TO valore2 
enunciati da eseguire se la condizione è vera 


END SELECT 
I due valori nella clausola CASE possono essere numerici o stringhe di 
testo (entrambe vanno racchiuse tra virgolette). 


Uso di valori numerici con la parola chiave TO 


Di seguito mostriamo un esempio che usa due valori numerici con la parola 
chiave TO in una clausola CASE: 


SELECT CASE userNum% 
CASE 1 TO 5 
PRINT "Il numero immesso era compreso tra 1 e 5" 
CASE 6 TO 10 
PRINT "Il numero immesso era compreso tra 6 e 10" 
END SELECT 


Si noti che il valore più piccolo si trova alla sinistra di TO; i valori vanno 
sempre posti in quest'ordine, altrimenti QBasic non interpreterà la condizione 
in maniera corretta e considererà sempre l’espressione come falsa. 

Questo vale anche per valori negativi; l'esempio che segue mostra la po- 
sizione corretta di un valore negativo: 


CASE -12 TO 3 


Siccome —12 è inferiore a 3 va posto alla sinistra di TO. 
Uso di stringhe con la parola chiave TO 


TO permette di usare anche un intervallo di stringhe all’interno di una clau- 
sola CASE, come in questo esempio: 
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SELECT CASE parola$ 
CASE "a" TO "m" 
PRINT "La lettera digitata è compresa tra a e m." 
CASE "m" TO "z" 
PRINT "La parola digitata è compresa tra me z." 
END SELECT 


Anche se a prima vista non sembrerebbe così, un intervallo di stringhe fun- 
ziona nello stesso modo di un intervallo di numeri. 

In un esempio precedente abbiamo visto che QBasic tratta ogni carattere 
separatamente (per QBasic, cioè, le lettere a ed A sono diverse). 

La ragione va trovata nel modo in cui un computer gestisce le informa- 
zioni. Per quanto sia possibile digitare lettere maiuscole e minuscole sulla ta- 
stiera e vederle sullo schermo, un computer non è in grado di gestire le lettere 
direttamente. Il microchip interno al computer può lavorare solo con numeri; 
quando si preme un tasto il computer traduce temporaneamente quel carattere 
in un numero con cui è in grado di lavorare. 

Quando poi è necessario usare quel numero sotto forma di carattere (per 
esempio visualizzarlo sullo schermo) QBasic lo converte nuovamente nel ca- 
rattere originariamente digitato. 

Naturalmente non c’è bisogno di imparare come avviene la gestione dei 
numeri, ma è necessario sapere che ciò accade per capire come QBasic gesti- 
sce caratteri individuali o stringhe di caratteri. Per cui anche se usate caratteri 
o stringhe il computer e QBasic li considerano semplicemente come numeri. 

Nell'esempio precedente avrete notato la sovrapposizione tra le due clau- 
sole CASE: nella prima l’intervallo va da a a m, nella seconda da m a z. Per- 
ché vi è questa sovrapposizione? L’esercizio seguente ne spiega le ragioni. 


Esercizio: Uso di un intervallo di stringhe in una clausola CASE 
1. Scrivere il programma TO-1.BAS (figura 5-10). 


2. Eseguite il programma e scrivete il nome car/o; sul vostro schermo appa- 
rirà questo risultato: 


Scrivete il vostro nome: carlo 


I] nome è compreso tra a em 
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Figura 5-10. Un programma che usa TO per confrontare del testo. 


Siccome la prima lettera è minuscola risulta vera la prima enunciato CA- 
SE. 


3. Eseguite il programma di nuovo e scrivete solo m; il risultato che otterre- 
te sarà il seguente: 


Scrivete il vostro nome: m 
I] nome è compreso tra a em 


Anche in questo caso siccome la lettera m verifica la prima clausola CA- 
SE QBasic esegue l’enunciato correlato a questa clausola. 


4. Eseguite il programma scrivendo il nome marco e otterrete questo risul- 
fato: 
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Scrivete il vostro nome: marco 


Il nome è compreso trame z 


Si noti che in questo caso il nome carlo verifica la seconda clausola CASE 
mentre nell’esempio precedente la sola lettera m verificava la prima clausola 
CASE. Perché? Ricordate che in un computer tutte le lettere vengono trattate 
come numeri; in un certo senso si può immaginare che una stringa di caratteri 
sia come una serie di numeri. Nell’esempio precedente la parola marco ha un 
“valore” più alto della lettera 71, così come 15 ha un valore più alto di 1. An- 
che se 15 e 1 cominciano con lo stesso numero, le regole matematiche ci di- 
cono che 15 ha un valore più alto di 1. 

Questa regola può essere applicata, in generale, anche a stringhe di carat- 
teri. Nell’esempio fatto QBasic non considera l’intera parola marco nell’esa- 
minare le clausole CASE; gli basta infatti esaminare le prime due lettere: ma. 
Siccome la combinazione ma ha un valore maggiore della semplice lettera m 
e questa rappresenta l’estremo superiore dell’intervallo da a a m, QBasic ri- 
conosce la prima condizione come non vera. 

La seconda condizione risulta invece verificata. Sebbene la stringa marco 
sia più lunga di una sola lettera, la prima lettera di questa parola cade nell’in- 
tervallo da m a z e perciò QBasic determina che la seconda condizione è veri- 
ficata. 


Esercizio: Un altro esempio di un intervallo di stringhe di testo 


1. Modificate il programma TO-1.BAS per ottenere TO-2.BAS (figura 5- 
11). TO-2.BAS è identico a TO-1.BAS tranne che per alcune modifiche 
alle condizioni — specialmente la prima e la terza clausola CASE. 


2. Eseguite il programma e scrivete la lettera maiuscola M; a video otterrete 
il seguente risultato: 


Scrivete i] vostro nome: M 


Il nome è compreso tra A a M 


3. Eseguite il programma di nuovo e scrivete Marco; il risultato sarà il se- 
guente: 
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Figura 5-11. Una versione modificata di TO-1.BAS. 


Scrivete il vostro nome: Marco 


I] nome è compreso traAeM 


Questa volta è la condizione nella terza clausola CASE che risulta verificata, 
perché Mz ha un “valore” maggiore delle prime due lettere di Marco. 


Uso di condizioni multiple con CASE 


Fino ad ora la condizione usata nelle clausole CASE è stata rappresentata da 
un unico valore, da una condizione o da un ventaglio di valori. QBasic per- 
mette di usare le virgole per separare più condizioni all’interno di una clauso- 
la CASE. Si consideri il seguente esempio: 


SELECT CASE numero% 
CASE 1,.33- 5, 2,9 
._ PRINT "Il numero immesso era dispari" 
CASE 2, 4, 6, 8, 10 
print "IL NUMERO IMMESSO ERA PARI" 
END SELECT 
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Usare una virgola in una clausola CASE è come usare l’operatore OR in 
un enunciato IF. Se uno degli elementi verifica la clausola CASE QBasic ese- 
gue gli enunciati associati. 

Questi elementi non devono essere dello stesso tipo e si possono mesco- 
lare valori, condizioni e intervalli, come in questo esempio: 


CASE 5, IS 6, 20 TO 30 


Esercizio: Uso delle virgole nelle clausole CASE 


Scrivete ed eseguite il programma TO-3.BAS (figura 5-12). Come potete ve- 
dere l’uso delle virgole per specificare elementi multipli aggiunge notevole 
flessibilità agli enunciati SELECT CASE. 


Figura 5-12. TO-3.BAS. Un programma che dimostra l’uso di condizioni multiple 
entro enunciato CASE. 
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CHE TIPO DI ENUNCIATI CONDIZIONALI 
E MEGLIO USARE? 


Sia IF sia SELECT CASE contengono moltissime opzioni e configurazioni 
diverse. Rispondere alle domande seguenti può aiutarvi a scegliere l’enuncia- 
to condizionale più appropriato da inserire nel vostro programma. 


Bi Con quale tipo di enunciato mi trovo più a mio agio? Non dimenticate 
che grazie all’uso di parole chiave come ELSE o ELSEIF, per l’enuncia- 
to IF e CASE o CASE ELSE, per l’enunciato SELECT CASE, è possibi- 
le ottenere gli stessi risultati da entrambe le espressioni. Usate quindi 
l’enunciato con cui vi sentite più a vostro agio. 


BI Quante sono le condizioni contenute nel vostro enunciato? SELECT CA- 
SE richiede un minimo di tre istruzioni separate per impostare anche una 
sola condizione! Perciò, se avete soltanto una condizione può essere con- 
sigliabile l’uso dell’enunciato IF. 

Se avete due o più condizioni IF e SELECT CASE sono ugualmente faci- 
li da usare. 


Se avete molte condizioni, SELECT CASE può essere la scelta migliore, 
perché risulta più semplice da leggere e da capire di un enunciato IF. Un 
enunciato SELECT CASE va anche meglio in tutti quei casi in cui volete cer- 
care un numero di valori specifici che non ricadono perfettamente in un inter- 
vallo. 


SOMMARIO 


Gli enunciati condizionali rendono i programmi più flessibili e “intelligenti”. 
Essi permettono di controllare l’esecuzione di un programma sulla base delle 
informazioni digitate dall’utente o modificate dal programma in fase di ese- 
cuzione. Le espressioni condizionali diventeranno parte integrante della mag- 
gior parte dei vostri programmi. 


DOMANDE ED ESERCIZI 


1. Che differenze ci sono tra un’espressione numerica e una condizionale? 


2. Quali, tra questi, non sono operatori condizionali? 
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\ UL a WwW 


10. 
11. 


EI2 


a. <= d. < g. <> La 
DD. >< È: SS h. > m. << 
Ca _= f 2 Ta =< n. = 


. Vero o Falso. Bisogna sempre usare THEN sulla stessa riga di IF. 
i Qual è la differenza tra l’operatore AND e l’operatore OR? 
. Qual è la funzione di ELSE? In che cosa si differenzia da THEN? 


. Come funziona la funzione ELSEIF? Quali altre parole chiave vanno 


usate con ELSEIF? 


. Scrivete un programma che ponga all’utente una domanda a cui è possi- 


bile rispondere con un sì o con un no e istruitelo a scrivere S per sì e N 
per no. Includete un gruppo di enunciati che verranno eseguiti se l’utente 
digita S e un gruppo se l’utente digita N. Includete un terzo gruppo di 
enunciati che verranno eseguiti se l’utente non dà una risposta corretta. 
Un consiglio: non dimenticate di controllare la corrispondenza maiusco- 
le/minuscole. 


. Come funziona l’enunciato SELECT CASE? 


. Che funzione svolge la clausola CASE? 


Che funzioni svolgono IS e TO in un enunciato CASE? 


Scrivete un programma che invita l’utente a descrivere tre oggetti. Il pro- 
gramma deve mostrare una lista numerata di oggetti e chiedere all’utente 
di scrivere il numero corrispondente all’oggetto da descrivere. Usate SE- 
LECT CASE per visualizzare le informazioni appropriate e includete de- 
gli enunciati da eseguire se l’utente non dà una risposta appropriata. 


; 
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Finora avete appreso la maggior parte dei principi fondamentali del linguag- 
gio QBasic. In questo capitolo impareremo a usare uno degli strumenti più 
potenti di QBasic: il loop. Usando i loop potremo risparmiare molto tempo 
prezioso facendo eseguire al computer compiti ripetitivi in molto meno tem- 


po. 


INTRODUZIONE AI LOOP DI QBASIC 


Un loop consiste semplicemente nella ripetizione di uno o più enunciati di 
QBasic. I loop si possono ripetere in due modi: 


8 Undeterminato numero di volte. 
Bi Fino aquandosi verifica una certa condizione. 


In QBasic, tre enunciati, FOR, WHILE, e DO permettono di aggiungere 
dei loop al programma. Nell’enunciato FOR, viene specificato per quante 
volte deve essere eseguito il loop. Negli enunciati WHILE e DO, va specifi- 
cata una condizione; QBasic la valuta ed esegue il loop fino a quando la con- 
dizione non risulta soddisfatta. Sebbene gli enunciati FOR, WHILE, e DO 
eseguano funzioni simili, ognuno di essi svolge il suo compito in modo leg- 
germente diverso. Come vedremo, le variazioni fanno sì che ogni enunciato 
sia adatti a un particolare tipo di lavoro. 


L'AFFERMAZIONE FOR 


Per creare un loop che svolga il compito assegnato uno specifico numero di 
volte (il tipo di loop più comune in QBasic), si usa l’enunciato FOR. L’enun- 
ciato FOR termina sempre con l’enunciato NEXT, come si vede chiaramente 
dalla sua sintassi: 


FOR variabile = inizio TO fine 


enunciati che devono essere ripetuti 
NEXT variabile 


Bi variabileè una variabile numerica che indica quante volte QBasic ha ese- 
guito il loop. QBasic incrementa variabile ogni volta che esegue il loop. 
Si noti che variabile segue sia l’enunciato FOR che l’enunciato NEXT. I 
nomi della variabile devono essere esattamente gli stessi. 
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Bi inizioè 11 valore numerico, un numero o un’espressione numerica, da cui 
si vuol far cominciare QBasic a contare. 


BB fineè un valore numerico, un numero o un’espressione numerica, che di- 
ce a QBasic quanto deve contare, cioè, quante volte deve ripetere il loop. 
Quando si assegnano dei valori a inizio e fine, bisogna tenere a mente i 
seguenti suggerimenti: 


8 Perinizioe fine sono ammessi valori sia positivi che negativi. 


1  Perinizioe fine sono ammessi sia numeri interi che valori che contengo- 
no numeri decimali. | 


Il valore di inizio deve essere inferiore o uguale al valore di fine. 
s Il valore di inizio non deve essere necessariamente 1. 


Gli enunciati tra FOR e NEXT sono quelli che QBasic esegue il numero 
di volte specificato. Non c’è limite al numero di enunciati che si possono usa- 
re, e inoltre gli enunciati non devono essere necessariamente dello stesso tipo. 

QBasic usa l’enunciato NEXT per contare quante volte ha eseguito gli 
enunciati fra FOR e NEXT. Ecco un esempio di un enunciato FOR che stam- 
pa un messaggio cinque volte, incrementando ogni volta la variabile 1%: 


FOR i& = 1 TO 5 
PRINT "Sono in un loop." 
NEXT i% 


Tutte le volte che ha completato un loop, QBasic torna di nuovo all’enun- 
ciato FOR per confrontare il valore di i% con il valore di fine (che è 5). 

Non appena 1% supera fine, QBasic torna all’enunciato che segue NEXT 
e continua a eseguire il programma. 


Esercizio: Uso del loop di tipo FOR 


1. Scrivete il programma FOR-1.BAS (figura 6-1). 


2. Eseguite il programma; il risultato dovrebbe essere il seguente: 


Scrivi un numero da 2 a 5: 4 


Queste righe verranno stampate 4 volte. 
Questa è la volta 1 


LIO 


“nia alii rai 
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i FoR=2.BAS. i 
|! Questo programma. mostra un 1009 di tipo FOR. che | non, i 
i i 3 | n° 


| * FOR-1.BAS I oo -__- 
| Te LS mostra Ù ‘uso dell UA di tipo | FOR. ___-. 


n * “Scriv vi un numero. da 2 @ id 3° svolte __._ .. i 


por Da oa i _ 
PRINT. di valore corrente di 


PRINT queste è ut verranno stampate” ; voltes ; "volte. 
PRINT a cda volta"; i i — 


Figura 6-2. Un loop di tipo FOR che non può essere eseguito. 


Figura 6-1. Un semplice loop di tipo FOR. | - Perché usare i 


| . Avrete notato che la maggior - parte dei coop] FOR in i questo libro usano 1% - 
Queste righe verranno stampate 4 volte. cone variabile di loop. Per quale motivo? ++... 
Questa è la volta 2 i - Prima ancora che il BASIC venisse inventato, tolti ._. | - 
| “usavano: un linguaggio chiamato FORTRAN. In FORTRAN, la prima let 
| tera di un nome di variabile ne specificava il tipo. Per. esempio, un. qua- | 
- lunque nome di ‘variabile che ‘cominciasse con una lettera da I aN . 
Queste righe verranno stampate 4 volte. I | denotava. ‘una variabile intera, ‘così come ora in QBasic un segno di per 
Questa è la volta 4 “i. ® Li ad: un nome e di variabile d denota Lil inte- 

o i. -—_;ij li; -. i... _ _ 
La ‘maggior re parte dei valori dei on: di i tipo | FOR s sono numeri interi. . 
O ca per Tisparmiare tempo, un ‘programmatore in FORTRAN di solito — 
1. Scrivete il programma FOR-2.BAS (figura 6-2). Osservate che inizio è O ‘usava la variabile i come valore di loop. I programmatori che avevano bi 


maggiore di fine. <> di nidificare due o a i So veda a a questo di il ui 


Queste righe verranno stampate 4 volte. 
Questa è la volta 3 


Esercizio: Quando inizio è maggiore di fine 


2. Eseguite il programma. Vedrete che a eccezione del messaggio “Premi | _ 
un tasto per continuare”, la schermata dell’output apparirà vuota. QBasic i .. 


infatti ha visto che il valore di inizio era 6, un valore maggiore di quello _ ieminoiogia. a 2 »Hà\ÀVO’DDZDZDznzURD _ 
di fine e ha ritenuto concluso il suo compito. È necessario usare 1%, 0,j% e ; KI No si i può u usare un i. nome | 


dl variabile di SERE di i conta, cu. 0 E. 
SD. 4 LL... \1\{\{\{{\{{{Ò%%» 
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NOTA: E possibile eseguire questo programma anche se 
non si dispone di un monitor a colori. 


& Esercizio: Usare valori uguali per inizio e fine 


1. Cambiate l’enunciato FOR nel programma FOR-2.BAS in modo che ini- 
zio e fine abbiano lo stesso valore: 


FOR i%=5 T0 5 


2. Eseguite il programma e otterrete questo risultato: 


cui [primo opt sfondo] 
Il valore corrente di 1% è 5 _ 


Questa volta QBasic esegue il corpo dell’enunciato FOR una sola volta. 
Infatti, dal momento che 1 valori di inizio e fine sono gli stessi, QBasic dà 
per scontato che questo sia il suo ultimo “giro” ed esegue l’enunciato 
PRINT una volta prima di andare avanti. 


< 
S| 
toni 
D 


Il looping e l’enunciato COLOR 


Si parlerà più diffusamente dell’enunciato COLOR nel capitolo 11. Nell’eser- 
cizio che segue assisteremo a una dimostrazione in cui verrà impiegato que- 
sto enunciato insieme a un loop di tipo FOR. 


Esercizio: Cambiare i colori di fondo con un loop di tipo FOR 


de 1. Scrivete il programma FOR-3.BAS (figura 6-3). 


‘Bianco brillante. 


2. Eseguite il programma. Lo schermo avrà questo aspetto ma ogni riga sa- 
rà di un colore diverso: 


Questa riga è stampata con il colore 1 
Questa riga è stampata con il colore 2 
Questa riga è stampata con il colore 3 


Figura 6-3. Uso dell’ enunciato COLOR in un loop di tipo FOR. 
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Questa riga è stampata con il colore 4 Il] colore di primo piano è 7; il colore di fondo è 6 
Questa riga è stampata con il colore 5 1] colore di primo piano è 8; il colore di fondo è 7 
Questa riga è stampata con il colore 6 Il colore di primo piano è 9; il colore di fondo è 8 
Questa riga è stampata con il colore 7 I] colore di primo piano è 10; il colore di fondo è 9 
Questa riga è stampata con il colore 8 I] colore di primo piano è 11; il colore di fondo è 10 
Questa riga è stampata con il colore 9 Il] colore di primo piano è 12; il colore di fondo è 11 
Questa riga è stampata con il colore 10 I] colore di primo piano è 13; il colore di fondo è 12 
Questa riga è stampata con il colore 11 I] colore di primo piano è 14; il colore di fondo è 13 
Questa riga è stampata con il colore 12 Il colore di primo piano è 15; il colore di fondo è 14 


Questa riga è stampata con il colore 13 
Questa riga é stampata con il colore 14 
Questa riga è stampata con il colore 15 


3. Premete un tasto per tornare alla Finestra di digitazione e osservate l’e- 
nunciato COLOR contenuta nel loop FOR. Guardate attentamente i valo- 
ri che definiscono i colori di primo piano e di fondo: il colore di primo 

iii : di fond , piano è definito dal valore di i% mentre il colore di fondo è definito dal 

Riina li i a i fondo con un loop valore di i% meno 1. In questo modo si evita di definire con lo stesso va- 
di tipo FOR io se | i | 
ore il colore di primo piano e il colore di fondo. Se questi valori fossero 


1. Scrivete il programma FOR-4.BAS (figura 6-4). gli stessi non si potrebbe più leggere il testo. 


Il looping e l’enunciato SOUND 


Ancora una volta si parlerà più diffusamente dell’enunciato SOUND nel ca- 
pitolo 11. Nell’esercizio che segue, l’enunciato FOR unito all’enunciato 
SOUND fornisce una chiara prova della versatilità dei loop. 


.. du ‘programma usa un ii di ni FOR. e i enunciato. 
Li. Per cambiare | i colori di cli i. e sl fondo. 


=l1 To. 15 1 Usa - i colori, da 1 a 16 i _.;.i.—. .{: -“°_0Ò6Ò@ _ i 
COLOR 16, di = 1 i: _O _ _ ..\V) _ enunciato SOUND | I _ 
mP' "n11' L enunciato SOUND fa: sì che il computer crei un suono. La sintassi “del 


Figura 6-4. Cambiare i colori di primo piano e di fondo con un loop di tipo FOR. 


2. Eseguite il programma; il testo che apparirà a video sarà a colori con di- 
versi colori di fondo e primo piano: 


I] colore di primo piano è 1; il colore di fondo è 0 500 her p per mezzo ) secondo: | 
Il colore di primo piano è 2; il colore di fondo è 1 — Souno 5 500, 3 È 

Il colore di primo piano è 3; il colore di fondo è 2 - 

Il colore di primo piano è 4; il colore di fondo è 3 

Il colore di primo piano è 5; il colore di fondo è 4 

Il colore di primo piano è 6; il colore di fondo è 5 
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Esercizio: Uso delle enunciati FOR e SOUND 
le 1. Scrivete il programma FOR-5.BAS (figura 6-5). 


- Pistola è a razzo! 11° è 
, Dà 


di valore di. ik ne 
uv ‘suono ——_-. 


Figura 6-5. FOR-5.BAS: un programma per la generazione dei suoni. 
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2. Eseguite il programma; a video apparirà questo invito: 


GENERATORE DI EFFETTI SONORI 
Scegli il suono che vorresti sentire 
dal seguente menu: 


1. Pistola a razzo 
2. Sirena 
3. Decollo! 


Digita: dx /0 a 


3. Digitate il valore appropriato per sentire il suono che avete scelto. 


Eseguite il programma alcune volte per provare ogni suono, dopodiché 
sperimentate questo programma cambiando i valori nei vari enunciati 
SOUND ed eseguite nuovamente il programma. Noterete che la maggior par- 
te dei valori di durata sono bassi; infatti, i valori di durata più bassi vanno 
meglio per gli effetti sonori, mentre quelli più alti verranno usati per creare 
una melodia. 


Controllare il calcolo con STEP 


Come si è visto, quando QBasic esegue un loop di tipo FOR comincia con 
l’assegnare il valore di inizio alla variabile che segue FOR e poi esegue il lo- 
op attraverso il blocco degli enunciati sino a che il valore della variabile con- 
tatore è più grande del valore di fine. Ogni volta che incontra l’enunciato 
NEXT, QBasic incrementa il valore del contatore di 1. 

Servendosi della clausola STEP si può anche dire a QBasic di incremen- 
tare il contatore di un valore diverso da 1, come avviene in questo esempio: 


FOR i% = 5 TO 25 STEP 5 
PRINT "Questo messaggio verrà stampato 5 volte." 
NEXT i% 


Quando QBasic incontra l’enunciato NEXT, incrementa il contatore del 
numero che è stato specificato dopo STEP. 

Il numero della clausola STEP non deve essere necessariamente positivo. 
Se si indica un numero negativo dopo STEP, QBasic fa diminuire il valore 
iniziale ogni volta che incontra l’enunciato NEXT. 

Il valore STEP influisce anche sui valori assegnati a inizio e fine: 
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8 Se il valore STEP è positivo, il valore di inizio deve essere minore o 
uguale al valore di fine. 


Bi Se il valore STEP è negativo, il valore di inizio deve essere maggiore o 
uguale al valore di fine. 


Riflettete un momento: se si usa un valore negativo per STEP e fine è 
maggiore di inizio, QBasic dà per scontato che il lavoro è concluso e dunque 
salta il blocco degli enunciati senza eseguirlo e continua a eseguire il resto 
del programma. 


Esercizio: Uso di STEP 
1. Scrivete il programma FOR-6.BAS (figura 6-6). 


Lay 


1 FOR 6. LAS | _- - 
i Questo programma illustra I uso di STEP. 


LL. _ __ 
(FOR Li 5 TO 1 STEP. i 
“COLOR i% .l.... __.. 
PRINT "Caduta!" _ _- 
SOUND (50 * i i. 
! NOTA i _ 


Figura 6-6. Uso di STEP in un enunciato FOR. 


2. Eseguite il programma e QBasic mostrerà la parola Caduta! 15 volte, 
ogni volta in un colore diverso e con un suono di accompagnamento. 


Nidificare i loop di tipo FOR 
Nidificare significa inserire un loop all’interno di un altro loop. Quello che 


segue è un esempio di un loop di tipo FOR nidificato: 


FOR i% = 1 TO 5 
FOR j% = 1 TO 5 
PRINT "Vedrai questo messaggio 25 volte." 


NEXT j% 
NEXT 1% 
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In questo esempio il rientro aiuta davvero a capire che cosa sta succeden- 
do. In un loop di tipo FOR nidificato, il loop di tipo FOR interno è un enun- 
ciato per il loop esterno; cioè, il loop di tipo FOR esterno esegue il loop 
interno per il numero di volte specificato. Nell’esempio, il loop esterno ese- 
gue il loop interno per un totale di 5 volte, ma poiché il loop interno esegue a 
sua volta gli enunciati per 5 volte, QBasic finisce con l’eseguire l’enunciato 
PRINT 25 volte in totale. 


Esercizio: Uso di loop di tipo FOR nidificati 
1. Scriveteil SOIA FOR-7.BAS A 6- vi 


Li FOR 1. BAS 


_- 


PRINT. si loop interno s 
- La 


Ri -i10 5 
1. 1 


Figura 6-7. Uso di loop di tipo FOR nidificati. 


2. Eseguite il programma per ottenere questo risultato: 


Il loop interno stamperà i numeri colorati: 


Numero dei cicli del loop esterno 1 
12345678910 
Numero dei cicli del loop esterno 2 
123456789 10 
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Numero dei cicli del loop esterno 3 
12345678910 
Numero dei cicli del loop esterno 4 
12345678910 
Numero dei cicli del loop esterno 5 
123456789 10 


L’enunciato SOUND crea un suono dopo che ogni numero del loop inter- 
no è stato stampato. Premete un tasto qualsiasi per tornare alla Finestra di di- 
gitazione, cambiate dei valori e cercate di prevedere che cosa farà il 
programma che avete cambiato prima di eseguirlo; poi eseguite il programma 
per vedere se avevate indovinato. 


L'AFFERMAZIONE WHILE 


Per progettare un loop che si ripete finché non si verifica una specifica condi- 
zione, si usa l’enunciato WHILE, che termina sempre con l’enunciato 
WEND, come si vede nella seguente sintassi: 


WHILE condizione 
enunciati che devono essere eseguiti ripetutamente 
WEND 


condizione può essere una qualunque espressione condizionale (come anno% 
< = 1959, o temperatura% < 0). 
Quando incontra l’enunciato WHILE, QBasic valuta condizione: 


Bi condizione è vera, QBasic esegue il blocco delle enunciati tra WHILE e 


WEND e poi controlla nuovamente condizione. 


B condizioneè falsa, QBasic salta subito all’enunciato WEND e va avanti 
eseguendo il resto del programma. 


Per usare un loop WHILE con successo, bisogna provvedere a modifica- 
re la condizione che segue l’enunciato WHILE all’interno del loop. 


NOTA: È necessario assicurarsi che la condizione alla 
fine diventi falsa; in caso contrario il loop non si ferme- 
rà mai e il resto del programma non verrà eseguito (un 
loop che non si arresta si chiama loop infinito. Per fermare un loop 
infinito basta tenere premuto il tasto Ctrl e premere Pausa.) 
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= Esercizio: Uso del loop di tipo WHILE 


| Nel programma che segue, ogni attività ha luogo all’interno del loop e poiché 


QBasic aumenta il valore di numUtente% ogni volta che esegue il loop, nu- 
mUtente% diventa alla fine maggiore di 12. Tutto ciò crea una falsa condizio- 
ne e fa sì che QBasic cessi di eseguire il loop. 


1. Scrivete il programma WHILE.BAS (figura 6-8). 


- NILE. AS 


È PRINT. 


De numbtente®; x 1 L 


Figura 6-8. Uso di un loop di tipo WHILE. 

2. Eseguite il programma; lo schermo dell’output dovrebbe apparire così: 
Scrivi un numero da 1 a 10: 9 
Il valore di numUtente& è 9 
Il valore di numUtente% è 10 


Il valore di numUtente% è 11 


Il valore di numUtente% è 12 
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Nidificazione di loop di tipo WHILE 


Si è già visto che è possibile nidificare gli enunciati FOR; la stessa cosa SÌ 
può fare con gli enunciati WHILE. Ogni enunciato WHILE ha una sua condi- 
zione e si chiude con l’enunciato WEND; non è necessario che le due condi- 
zioni siano collegate. 

La sintassi per un loop di tipo WHILE nidificato è la seguente: 


WHILE condizione 
WHILE condizione 
enunciato per il loop di tipo WHILE interno 
WEND 
WEND 


Il loop di tipo WHILE interno svolge funzione di enunciato per quello 
esterno. 


NOTA: Per evitare loop infiniti, si ricordi che sia la con- 
dizione interna che quella esterna devono alla fine risul- 
tare false. 


L’ENUNCIATO DO 


L’enunciato DO viene impiegato con l’enunciato LOOP per sviluppare due 
tipi di loop: 


Bi Unloopche si ripete finché una certa condizione resta vera (DO WHI- 


LE). 


83 Un loopche si ripete sino a che una certa condizione non risulta vera 
(DO UNTIL). 


DO WHILE: il loop che si ripete 
finché una condizione resta vera 


Per creare un loop che si ripete finché una condizione resta vera, si deve usa- 
re un loop di tipo DO con la seguente sintassi: 


DO WHILE condizione 
blocco delle enunciati che devono essere eseguiti 
LOOP 
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Un loop DO di questo tipo funziona allo stesso modo dell’enunciato 
WHILE. QBasic esamina la condizione: 


Bi Se condizioneè vera, QBasic esegue gli enunciati e continua a farlo fin- 
ché la condizione rimane vera. 


Se condizione è falsa, QBasic salta l’enunciato LOOP ed esegue il resto 
del programma. 


n rapporto condizione- enunciato 


Comes si è visto n capitolo 2 QBasic esegue. le istruzioni nell’ ii in - 
cui appaiono nei programmi. L ‘ordine è è particolarmente importante nel 
; > dell’ ‘enunciato DO; in 1 tale e enunciato, ola, si RI una er 


“i - si vuole « che die enunciati eseguano i ion compia. saltato sla — 
| base. del valore di condizione, si deve mettere condizione sulla riga 
n _ del enunciato DO: A A././.{}_._.ii.. |. i I 


uu {WHILE: UNTIL) e condiione .. __’_’ 
0 degli. n. devono essere o eseguiti 


1 n si uu che di enunciati eseguano < almeno ‘una oi i loro compi- | 
L ‘qualunque. sia il valore di cenno si i deve mettere. a ndizione - 


.- Quando ondine viene e presa i in n considerazione , QBasie ha gùo ese- i 


- - guito ul una a volta gli enunciati. | _ 


Esercizio: Uso di un loop di tipo DO WHILE con la condizione all’inizio 
1. Scrivete il programma DO-1.BAS (figura 6-9). 
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mm programma mostra - uso: ui. un i tcop di tipo Do VATLE. > 
i noti che la condizione è : è all'inizio del loop. + o si noti che la condizione è alla Fine del. loop. 


numUtente® — 


e” e mUtenter | __+’ 
E ‘ Diminuisce numbtente di L i 


Figura 6-9. Uso di un loop di tipo DO WHILE. Figura 6-10. Un loop di tipo DO WHILE con la condizione alla fine. 
2. Eseguite il programma; lo schermo dell’output dovrebbe apparire così: Scrivi un numero da 10 a 15: 13 


Scrivi un numero da 10 a 15: 13 i valve di miniera 8-13 


| x Il valore di numUtente% è 12 
Il valore di numUtente% è 13 ‘ SI 

| oa Il valore di numUtente% è 11 
Il valore di numUtente% è 12 i cu 

Da Il valore di numUtente% è 10 
I] valore di numUtente% è 11 


Il valore di numUtente% è 10 | Sembrerebbe in tutto simile a DO-1.BAS, ma non è così. Vediamo infatti 


. l come continua l’esercizio: 
3. Eseguite nuovamente il programma e scrivete un valore uguale o minore | 
di 9. Il risultato sarà il seguente: 3. Eseguite nuovamente il programma ma questa volta scrivete un valore 


minore o uguale a 9. Lo schermo output apparirà in questo modo: 
Scrivi un numero da 10 a 15: 6 
Scrivi un numero da 10 a 15: 6 


QBasic si è accorto che la condizione era falsa e ha saltato gli enunciati 
all’interno del loop. Il valore di numUtente% è 6 


Lui | sua Di | Qui si vede la differenza: anche se il valore di numUtente% ha fatto sì 
le Esercizio: Tso-deunloopdiapo DO YWHILE:comla:condizione: alla fine che la condizione nell’enunciato LOOP fosse falsa, QBasic non ha incon- 

Il programma DO-2.BAS è identico a DO-1.BAS ma la condizione è stata trato condizione se non dopo aver eseguito una volta il corpo del loop di 
spostata alla fine del loop. tipo DO. 


1. Modificate il programma DO-1.BAS in DO-2.BAS (figura 6-10). 


2. Eseguite il programma e osservate 1l risultato: 
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DO UNTIL: il loop che si ripete Scrivi un numero da 1 a 10: 7 
sino a che una condizione non risulta vera i sn: 
Il valore di numUtente% è 7 

Per creare un loop che esegue i suoi compiti sino a che una certa condizione I] valore di numUtente% è 8 
non si verifica, bisogna usare un loop di tipo DO con la seguente sintassi: Il valore di numUtente% è 9 
DO UNTIL condizione Il valore di numUtente% è 10 

blocco degli enunciati che devono essere eseguiti Dal momento che la condizione numUtente% > 10 è falsa quando QBa- 
LOOP sic incontra il loop per la prima volta, questo viene eseguito sino a che la 


QBasic esamina la condizione: condizione risulta vera. 


3. Eseguite nuovamente il programma, questa volta scrivendo un valore 


BM Secondizioneè vera, QBasic salta l’enunciato LOOP per eseguire il resto i aù 
uguale o maggiore a 11. Lo schermo dell’output apparirà in questo modo: 


del programma. 


Bi Se condizioneè falsa, QBasic esegue gli enunciati e continua a farlo sino SSEDoE UR Rumeno darla: 105743 


a che condizione non risulta vera. | Questa volta, poiché la condizione è vera quando QBasic incontra il loop, 
questo viene saltato e QBasic prosegue con l’esecuzione del programma. 


a Esercizio: Uso di un loop di tipo DO UNTIL con la condizione all’inizio 


Esercizio: Uso di un loop di tipo DO UNTIL con la condizione alla fine 
1. Scrivete il programma DO-3.BAS (figura 6-11). ea 


1. Modificate il programma DO-3.BAS in DO-4.BAS (figura 6-12). 


; numUtente& d.- 
"°° inerementa numUtente” di L 


Figura 6-11. Uso di un loop di tipo DO UNTIL. I Li __.... _ 1.1... .... 
Figura 6-12. Un loop di tipo DO UNTIL con la condizione alla fine. 


2. Eseguite il programma; lo schermo output dovrebbe apparire così: 
2. Eseguite il programma e osservate il risultato: 
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Scrivi un numero da 1 a 10: 7 


Il valore di numUtente% è 
Il valore di numUtente% è 
Il valore di numUtente% è 
Il valore di numUtente% è 


pus LO 0OONI 


Il risultato di questo programma è lo stesso di quello precedente. 
3. Eseguite nuovamente il programma scrivendo un valore uguale o mag- 
giore di 11. Ecco l’output del programma: 


Scrivi un numero da 1 a 10: 13 


Il valore di numUtente% è 13 


Questa volta, poiché la condizione era alla fine del loop, QBasic ha ese- 
guito una volta i contenuti del loop non sapendo quale fosse la condizio- 
ne sino a quando non l’ha incontrata alla fine del loop. 


Nidificare loop di tipo DO 
Si possono nidificare i loop di tipo DO allo stesso modo dei loop di tipo FOR 
e di tipo WHILE. 


Dal punto di vista dell’impostazione i loop non sono assolutamente colle- 
gati; in altre parole, se si hanno due loop di tipo DO nidificati e si mette la 


condizione all’inizio del loop esterno, non è necessario metterla anche all’ini- — 


zio del loop interno. Naturalmente, come per un singolo loop di tipo DO, bi- 
sogna assicurarsi che sia il loop interno che il loop nidificato abbiano 
termine. 


NIDIFICARE TIPI DIVERSI DI LOOP 


Finora si è parlato di nidificare loop dello stesso tipo, un loop di tipo FOR al- 
l’interno di un altro loop di tipo FOR, un loop di tipo WHILE all’interno di 
un altro loop di tipo WHILE e così via. 

Si possono anche mescolare i tipi di loop, specialmente se ciò contribui- 
sce a rendere il programma più efficiente. Il programma che segue inserisce 
un loop di tipo FOR all’interno di un loop di tipo DO. Il loop di tipo DO per- 
mette di eseguire il loop di tipo FOR quante volte si desidera senza dover ri- 
cominciare il programma ogni volta. 
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Esercizio: Nidificare tipi diversi di loop 


1. Scrivete il programma NIDIFICA.BAS (figura 6-13). 


Figura 6-13. Nidificare tipi diversi di loop. 


2. Eseguite il programma; l’output del programma dovrebbe essere il se- 
guente: 
Quanti toni vuoi sentire? 
(Digita 0 per finire) 5 


Quanti suoni vuoi sentire? 
(Digita 0 per finire) 20 


Quanti suoni vuoi sentire? 
(Digita 0 per finire) 0 


USI PRATICI DEI LOOP DI QBASIC 


Dopo aver cominciato a conoscere i loop, passiamo a vedere 1 loro usi pratici. 
Gli esempi che seguono presentano alcune pratiche e divertenti applicazioni 
dei loop. 
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Uso di un loop per raccogliere informazioni 


Supponiamo che si voglia automatizzare la preparazione di un budget mensi- 
le. La filosofia che sta dietro alla preparazione di un budget di questo tipo è 
chiara: si sottraggono mensilmente le spese dalle entrate. 

Usando gli strumenti di cui si è parlato finora, si può scrivere un pro- 
gramma in QBasic che può essere d’aiuto nello svolgere questo compito. Si 
possono usare alcuni enunciati INPUT: uno per la somma iniziale e uno per 
ogni spesa; fatti alcuni calcoli, QBasic stamperà quanti soldi sono rimasti. La 
figura 6-14 mostra un esempio di questo tipo di programma. 


“Quale loop scegliere? ___ 


. quale tipo di i 00p, sarei n un + pro gr gramma; - 


Toi del BASIC). 


Questo programma funziona abbastanza bene ma presenta dei limiti: 


Bi Poiché il numero delle spese può variare di mese in mese, si dovrà cam- 
biare il programma ogni volta che lo si esegue. 


Bi Ogni spesa che si scrive deve essere subito sottratta dal totale; ciò non 
comporta grossi problemi, ma dà luogo a una serie di calcoli ripetitivi. 
Basti solo immaginare quanto lungo sarebbe il programma se ci fossero 
20 o più spese ogni mese. 


I programmi che presentano simili ripetizioni sono i candidati ideali per 
un loop. Il programma BUDGET.BAS della figura 6-15 compie lo stesso la- 
voro del programma presentato nella figura 6-14 ma offre alcuni vantaggi: 
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a Questo programma 2 aiuta | a calcolare dun saldi 


o nane Li ave pagato. le bollette mensili - 


ne in 


RS ioni 
totale! = : totale! - spes 
INPUT "Scrivi spesa | 


Figura 6-14. Un esempio di programma di budget. 
1 Èunprogramma più breve. 


E Prevede un numero variabile di spese in base al numero totale di bollette 
che pensate di inserire. 


Bi Usaun loop sia per chiedere la somma delle bollette sia per sottrarre la 
somma dal totale. 


Uso di loop con numeri in ordine casuale 


Dadi, roulette, bingo, lotteria: tutti questi giochi fanno uso di numeri che ri- 
corrono secondo un ordine casuale, un ordine che non si può predire. In que- 
sto paragrafo vedremo gli strumenti di cui dispone QBasic per creare dei 
numeri casuali: RND, RANDOMIZE TIMER e INT. 
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Figura 6-15. Un programma di budget più efficiente. 


Generazione di numeri in ordine casuale 


La funzione RND indica a QBasic di restituire un numero scelta a caso; il nu- 
mero sarà un numero in virgola mobile a precisione singola tra 0 e 1. RND è 
una funzione, e perciò deve essere usata all’interno di un enunciato di QBa- 
sic. La sintassi per la forma più semplice della funzione RND è questa: 


RND 


RND restituisce la stessa serie di numeri ogni volta che si esegue il pro- 
gramma. Per creare ogni volta una serie di numeri diversi, si usa RANDOMI- 
ZE TIMER come uno dei primi enunciati del programma. La sintassi per 
l’enunciato RANDOMIZE TIMER è semplice come quella della funzione 
RND: 


RANDOMIZE TIMER 
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Esercizio: Come generare dei numeri in ordine casuale 


Il programma RND-1.BAS (figura 6-16) usa un loop di tipo FOR per creare 
sei numeri a caso (per creare più numeri a caso, cambiate semplicemente il 6 
dell’enunciato FOR in un valore più alto). 


1. Scrivete il programma RND-1.BAS. 


Figura 6-16. Scelta causale di numeri. 


2. Eseguite il programma e otterrete un risultato simile a questo: 


2494013 
.3081127 
3.670245E-02 
.574261 
-4791026 

» 1495265 


I numeri che otterrete saranno senza dubbio diversi da questi, proprio 
perché sono dei numeri scelti a caso. 


Personalizzazione dei risultati di RND 


Poiché è probabile che i numeri tra 0 e 1 non soddisfino le esigenze di tutti, si 
possono usare gli operatori matematici di QBasic per cambiare la grandezza 
dei risultati di RND. 
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Esercizio: Come generare dei numeri di dimensioni maggiori 
a 2 in ordine casuale 


Il programma RND-2.BAS (figura 6-17) è identico a RND-1.BAS, ma molti- 
plica il risultato di RND per 100, creando dei valori che vanno da 0 a 100. 


1. Modificate il programma RND-1.BAS in RND-2.BAS. 


ct R | RND-2. BAS |____ 
i Questo programma genera | numeri. 1a cas 


—. TIMER 


Figura 6-17. Generare numeri di dimensioni maggiori in ordine casuale. 


2. Eseguite il programma per avere un risultato simile a questo: 


85.67621 
42.35302 
87.795 

48.80183 
42,53306 
24.83424 


Come generare dei numeri interi in ordine casuale 


Se si desidera generare numeri interi in ordine casuale, bisogna usare la fun- 
zione INT insieme alla funzione RND. INT scarta la parte decimale di un nu- 
mero, mantenendo soltanto la parte intera; il formato è il seguente: 


INT(numero) 


numero è il numero decimale che si vuole arrotondare. Come tutte le fun- 
zioni che restituiscono numeri interi, il risultato intero di INT deve essere as- 
segnato o a un enunciato che accetta valori interi o a una variabile intera. 


140 


Ley 


Capitolo 6 - Uso dei loop di QBasic 


aa molto 0 piccoli o o molto ni in n Basie | ; _° _- 


Gli esercizi che seguono mostrano come usare la funzione INT insieme 
alla funzione RND per generare numeri interi in ordine casuale. 
Esercizio: Il gioco “indovina un numero” 


I numeri generati secondo un ordine casuale sono ideali per i giochi in cui bi- 
sogna indovinare un numero. Questo programma usa un loop di tipo DO: 


1. Scrivete il programma INDOVINA.BAS (figura 6-18). 


2. Eseguite il programma; l’output del programma dovrebbe apparire così: 


Il gioco Indovina Un Numero 
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Sto pensando a un numero da 1 a 100. 
Sei capace di indovinarlo? 


Che numero è? 50 
Prova un numero più grande! 


Che numero è? 99 
Prova un numero più piccolo! 


Che numero è? 65 
Prova un numero più grande! 


Che numero è? 71 
Esatto!!! 


Hai indovinato il numero con 4 tentativi! 


Esercizio: Scrivere una simulazione al computer 


Poniamo il caso si voglia scrivere un programma che calcoli quante volte 
esce il numero 7 tirando 100 volte 2 dadi. La funzione RND si rivela ancora 
una volta utile, come si può vedere nel seguente programma DADI.BAS (fi- 
gura 6-19). 


1. Scrivete il programma DADI.BAS. 


2. Eseguite il programma; l’output del programma dovrebbe essere: 


Programma simulazione-dadi 
Quante volte devo tirare i dadi? 50 
Sto lavorando... 


Tirando 50 volte, è uscito il numero 7 
per 10 volte. 


SOMMARIO 


I loop permettono di creare programmi potenti che ripetono un compito uno 
specifico numero di volte oppure fino a quando incontrano una condizione. In 
questo capitolo abbiamo visto i loop di tipo FOR, WHILE e DO. Con le 
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Figura 6-18. Un gioco in cui bisogna indovinare un numero. 
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Figura 6-19. Un programma che simula il lancio di due dadi. 
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enunciati COLOR e SOUND, la funzione RND e con quanto si è appreso nei 
capitoli precedenti si è ora in grado di intraprendere dei progetti di program- 
mazione di sicuro effetto, come si vedrà nei prossimi capitoli. 


DOMANDE ED ESERCIZI 


. Qual è lo scopo di una variabile di calcolo in un loop di tipo FOR? 


. Quali valori possono essere assegnati agli elementi di inizio e fine in un 


loop di tipo FOR? 


. Quale numero bisogna specificare come argomento dell’enunciato CO- 


LOR se si vuole mettere il colore rosso nello sfondo? 


. Che cosa fa l’enunciato DO? 
. Che cos'è un loop nidificato? 


. Che effetto si ottiene mettendo la condizione in un loop di tipo DO all’i- 


nizio del loop? Che effetto si ottiene mettendola alla fine? 


. In quali circostanze si usa un loop di tipo FOR? E un loop di tipo WHILE 


o di tipo DO? 


. Scrivete un programma che tenga nota dei soldi spesi in benzina in una 


settimana. Usate un loop di tipo FOR per ordinare le banconote e le mo- 
nete spese e usate come totale una variabile in virgola mobile a precisio- 
ne singola. 


. Scrivete un programma che richieda all’utente una frequenza valida e i 


valori di durata per rieseguirli con l’enunciato SOUND. Usate un loop di 
tipo DO UNTIL per riunire le informazioni sino a che l’utente digita -999 
come frequenza. 


Scrivete un programma che simuli il lancio di un dado per 10 volte. 


Stampate il valore del dado dopo ogni tiro e visualizzate il messaggio Be/ 
tiro! in verde se esce 6. 
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Fino a questo punto abbiamo digitato programmi relativamente brevi (nessu- 
no più lungo di 30 righe) ma ora, dopo aver appreso i fondamenti di QBasic, 
possiamo affrontare programmi più lunghi. In questo capitolo verranno spie- 
gate alcune tecniche che permettono di scrivere programmi di maggiori di- 
mensioni con un minimo sforzo e senza grosse perdite di tempo. 

Analizzeremo due strutture di programma: i sottoprogrammi e le funzioni 
(vedremo in particolare come queste differiscano dalle funzioni interne usate 
sino ad ora): queste due strutture vengono usate per separare il programma in 
due unità di facile impiego dette procedure. Ci occuperemo inoltre della di- 
chiarazione di sottoprogrammi e funzioni e del loro uso nei programmi; que- 
sto ci permetterà anche di spiegare come l’ambiente QBasic si adatti alla 
programmazione modulare. Infine ci serviremo di tutti questi strumenti per 
dar vita a programmi efficienti e ben strutturati. 


PERCHÉ SI USANO PROCEDURE? 


Supponiamo di voler scrivere un programma che stampa le parole della can- 
zone popolare “John Brown”. Basandoci solo sulle conoscenze acquisite fino 
a questo momento dovremmo scrivere la canzone usando un gran numero di 
enunciati PRINT, come nel programma CANZONE.BAS (figura 7-1). 

CANZONE.BAS è abbastanza elementare e di facile comprensione: 
stampa ogni verso della canzone fermandosi quando lo schermo è pieno per 
consentire una più comoda lettura e poi passa alla schermata successiva. 

Si noti che il programma CANZONE.BAS contiene un ritornello che vie- 
ne ripetuto molte volte senza alcuna modifica; è evidente che un testo ripetiti- 
vo non solo richiede tempo per venir digitato ma rende anche più confuso il 
listato e più difficile il lavoro. Esiste un modo più semplice per codificare un 
programma che contiene parti ripetitive? 


Il vantaggio di usare una procedura 


La risposta alla domanda precedente è sì! QBasic fornisce una struttura di 
programmazione detta procedura che permette di scrivere un blocco di enun- 
ciati, assegnargli un nome e poi richiamarlo quando si vuole che il program- 
ma lo esegua. Le procedure presentano questi vantaggi: 


8 Le procedure eliminano la ripetizione di righe. Basta infatti definire 
una procedura una volta per poi eseguirla tutte le volte che si vuole. 
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CC CANZONE. BAS _.;... —1 
e i programma mostra le parole della « canzone "doh Brown" 00°’ 


. PRINT f-- — 

PRINT —- 4 i sorge Spr a cc {“{__- cu 
PRINT. "John Brown giace ur tomba a nel mu Prima strofa. 
PRINT "dopo una Tunga lotta contro. 1 oppressori." __._az).\à 
PRINT "John Brown. giace. nella tomba. dà Der dd i. \Ò\ . 


| PRINT! ‘ma Ì ‘anima vive ancor." 
PRIN 


PRINT. "Glory, i alleluia" n Ri tornello. - i -  ‘ 


| PRINT "Glory, glory alleluia" 


PRINT. "Glory, glory. allen (| | 
PRINT. “ma Li ‘anima vive ancor. 


POPRINTO 


C PRINT "con 19. suoi. compagni di valor ‘Seconda d_- 
PRINT - ; 
— PRINT "con 7. suoì "compagni di valor” — 

PRINT "ma v anima. vive ancor. dai cu. 

PRINT i _{__- L.... 
— PRINT ‘glory, - y alleluta* “Ritometio 

PRINT ‘Glory, glory alleluia! ;/_/{{{°{___- 

PRINT "Glory, glory allelujat 0 

PRINT "ma i anima vive ancor __- 
PRINT ::O 
INPUT “Premere Invio per continuare. 
PRINT | __. 
PRINT "poi 1 lo Hanno ucciso come . un traditor" Terza strofa qx’ 
| PRINT "ma traditore fu coluì che 1o impiccò;' I. 
| PRINT "poi lo hanno ucciso ‘come fosse. un traditor _- 
| PRINT "ma l'anima vive ancor...}: ___ 1 

SPRINT — ____ _ 

© PRINT è n. alleluia‘ ‘Ritornello n : 

PRINT "Glory, glory Zoo —iiò +61.’ 

PRINT "Glory, glory allelutat  / / ///{{/{/{{{{{ 
| PRINT "ma Li anima vive —.___ _- 

PRINT -. n. .il'’'’’ 
| PRINT "Joh Brown. è morto. ma lo schiavo è n | Tiberta" « ‘Quarta strofa 
| PRINT "tutti. fratelli. bianchi. e neri siamo gia _... -...- 

PRINT "John Brown è morto ma lo schiavo è in 1 Hiberta® i 

- PRINT “ma 1 ‘anima vive ancor..." 2_._;v._.. 

PRINT -_ . 

| PRINT i. alleluia" Rtiometio ..{<@ 


ni sposta$ ' Pausa. 


Figura 7-1. Un programma che stampa le parole della canzone “John Brown” tra- 
mite una serie di enunciati PRINT (continua). 
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| PRINT "Glory, glory alleluiat 
| PRINT "Glory, glory alleluia" = / | _- 


Figura 7-1. Un programma che stampa le parole della canzone “John Brown” tra- 
mite una serie di enunciati PRINT. 


3 Le procedure rendono il programma più semplice da leggere. Un 
programma diviso in parti più piccole è di più facile comprensione. 


3 Le procedure semplificano lo sviluppo del programma. Programmi 
suddivisi in unità logiche sono più facili da progettare, scrivere e ‘‘ripuli- 
re” (debug); inoltre programmatori diversi possono usare le stesse proce- 
dure. 


&î Le procedure possono essere usate in programmi differenti. Si posso- 
no creare procedure generali da usare molte volte in contesti diversi. 


Mm Le procedure estendono il linguaggio QBasic. Infatti possono svolgere 
compiti che non potrebbero essere realizzati direttamente con gli enun- 
ciati e le funzioni interne di QBasic. 


In questo capitolo vedremo come produrre e impiegare due procedure di 
QBasic: sottoprogrammi e funzioni. I primi consentono di suddividere il pro- 
gramma in unità più piccole che possono essere richiamate più volte; le se- 
conde forniscono dei valori utilizzabili dal programma. 


CREAZIONE DI SOTTOPROGRAMMI 


I sottoprogrammi rendono il codice più facile da leggere e riducono le ripeti- 
zioni. Un sottoprogramma è un blocco di codice racchiuso tra gli enunciati 
SUB e END SUB e può essere richiamato all’interno del programma quante 
volte si vuole. Quando un sottoprogramma finisce, il programma riparte dal- 
l’enunciato che segue il codice di chiamata del sottoprogramma. QBasic per- 
mette di creare e conservare i sottoprogrammi separatamente dal programma 
principale. 
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Sintassi di un sottoprogramma 
La sintassi di un sottoprogramma può definirsi in questo modo: 


SUB NomeSottoprogramma (parametroLista) 
dichiarazioni di variabili e costanti locali 
Enunciati del sottoprogramma 

END SUB 


3 SUBèlLVenunciato di QBasic che indica l’inizio della definizione del sot- 
toprogramma. 


i NomeSottoprogrammaè il nome del sottoprogramma. Può avere una lun- 
ghezza massima di 40 caratteri ed è il nome che il programma usa per 
“chiamare” il sottoprogramma. Non può corrispondere a una parola chiave 
di QBasic né al nome di una variabile o di una procedura del programma. 


Bi (parametroLista)è un elenco facoltativo di variabili (si veda, a questo 
proposito, il paragrafo “Inserimento di argomenti un sottoprogramma?”) 
che va racchiusa tra parentesi. 


8 dichiarazioni di variabili e costanti locali è un elenco facoltativo di varia- 
bili e costanti dichiarato e usato solo ed esclusivamente all’interno del sot- 
toprogramma. Queste non hanno alcun effetto su variabili o costanti che 
hanno lo stesso nome ma sono contenute in altre parti del programma. 


& Enunciati del sottoprogramma è la parte operativa del sottoprogramma 
dove si possono usare quasi tutti gli enunciati di QBasic. 


si END SUBè enunciato di QBasic che segna la fine della definizione del 
sottoprogramma. 


Per vedere come questi elementi lavorano insieme considerate il seguente 
sottoprogramma (Ritornello). Ogni volta che viene eseguito, il sottoprogram- 
ma stampa una riga vuota, il ritornello della canzone e un’altra riga vuota. 


SUB Ritornello 

' Il sottoprogramma Ritornello stampa il ritornello della canzone 
PRINT 

PRINT "Glory, glory alleluia" ‘Ritornello 

PRINT "Glory, glory alleluia" 

PRINT "Glory, glory alleluia" 

PRINT "ma l'anima vive ancor 

PRINT 

END SUB 
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Creazione di un sottoprogramma 


Nell’ambiente QBasic i menu permettono di creare e di lavorare velocemente 
e facilmente con i sottoprogrammi. QBasic dispone di due comandi di menu 
per lavorare con sottoprogrammi: 


Il comando Nuovo SUB (nel menu Modifica) 


ss Il comando SUBs (nel menu Visualizza) 


Il comando Nuovo SUB 


Il comando Nuovo SUB viene usato per aggiungere al programma un sotto- 
programma. Per creare un sottoprogramma si possono compiere i passi se- 
guenti: 


1. Selezionate il comando Nuovo SUB che apre la relativa finestra di dialo- 
go. 


2. Inserite il nome del sottoprogramma (se non è già disponibile). 


3. Scrivete i parametri e il corpo del programma. 


Il comando SUBs 


Il comando SUBs permette di esaminare e modificare i programmi. Questo 
comando apre una finestra di dialogo dalla quale si può selezionare la parte 
del programma su cui si vuole lavorare: il programma principale, un sottopro- 
gramma o una funzione. 


NOTA: Il comando SUBs viene attivato anche premendo 
F2 (questo è il modo più veloce per aprire la relativa fi- 
nestra di dialogo). 


Richiamare un sottoprogramma 


Dopo aver creato e dichiarato un sottoprogramma è possibile “chiamarlo” 
(eseguirlo). Per chiamare un sottoprogramma basta specificarne il nome (in- 
sieme a qualsiasi argomento che il sottoprogramma richiede) all’interno del 
programma principale o di un’altra procedura. 

Il programma CANZONE2.BAS (figura 7-2) mostra come dichiarare e 
chiamare il sottoprogramma Ritornello. In questa forma CANZONE2.BAS è 
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NOA VAAAKAAKAKKXX 
NKXKKX XKXXK XXXX 


LO 00000000000 0000000000000 
PYOOV00VOVOVOOIIAKAKAX 
O OOV0V0VOCOVV0ONNAKIIAAKKIA 
LO 000 0000000000000,0009,0,0 
XKIAAAAAAAAKA 
XXKKAAAAAAAA 
LO 0000000000000 00000001 
NYO V0ODIAAAMKKA 
KAKA 
XKKAKAKKKAAX 
LO 9000 00000000900009 


L00000 0000000004 
XXAKKKKKKKAIAAAAAKAAKAAKA 
POOOOVOVOOIAKAAAAA 
AKKKKKKK 
VAAKKAAAKAA 


XKKAKKAKAKX 
XKKKKKAX 
LO 0.0 000000000000,04 


PROGRAMMA 
PRINCIPALE. 


SOTTOPROGRAMMA 


FUNZIONE 
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L’enunciato D DECLARE 


| Uno dei vantaggi. di QB asic è che aiuta 2 a programmare conetamente Pa - 
| esempio QBasic aggiunge un enunciato DECLARE in ‘cima al program- 
| ma principale (al momento del salvataggio su disco) i in base alle informa - 
| zioni fornite al momento di creazione del programma. Un enunciato . 
| DECLARE i indica L esistenza dii un sottopro gramma; per questa Tagione a - 
| ogni sottoprogramma deve corrispondere u un ‘enunciato > DECLARE ii in ci l. 
a principale. | _ 1 A _° 
la sintassi dell’ enunciato DECLARE è è la seguente: 


SOECARE SUB. NomeSot toprograrma (parametri) | 


- - NomeSottoprogramma è è il nome del sottoprogramma « e i i parametri 
‘sono ui un i elenco di variabili accolte dal sottoprogramma.. - vb 


NOTA: Sebbene QBasic inserisca .. o DE- i - 
- CLARE autonomamente, “spetta a voi conservare l’e-- 
__ | lenco dei parametri. Se. modificate. l'elenco nel 
_ So. amma dovrete modificarlo anche all’interno delle i. 
- } nunciato DECLARE. Si veda il ‘paragrafo “Inserimento di ar 
1 gomenti un n sottoprogramma” ‘per magg iori informazioni. ÒÒ 


Per ‘convenzione. gli enunciati DECLARE vengono inseriti i dopo i i 
| commenti di introduzione e prima delle dichiarazioni delle variabili e dell 
le costanti; inoltre, Sa richiede che i enunciati precedano ogni. 
| enunciato » eseguibile. 19uR8S‘000@‘(‘(@(@0‘@‘0@@ _- 


più breve e più facile da leggere. Si noti come il sottoprogramma ritornello 
venga impostato al di fuori del programma principale (iniziando alla riga 43 
tra gli enunciati SUB e END SUB). Il programma principale chiama il sotto- 
programma Ritornello cinque volte. Il nome del sottoprogramma inizia qui 
con una lettera maiuscola: nel corso del libro useremo questa convenzione 
per distinguere i nomi delle procedure da quelli delle variabili e da quelli di 
altri enunciati e funzioni di QBasic. 


NOTA: La figura 7-2 contiene il listato del programma 
CANZONE2.BAS come apparirebbe se venisse stampato 
ma non come appare in realtà sullo schermo di QBasic. 
Ricordate che in QBasic tutti i sottoprogrammi vengono tenuti sepa- 
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rati dal programma principale e sono visibili attraverso il comando 
SUBs del menu Visualizza Per scrivere questo programma dall’ ini- 
zio potrete seguire le istruzioni fornite nell'esercizio successivo. 


La figura 7-3 mostra la definizione e la chiamata del sottoprogramma Ri- 
tornello in dettaglio. 


Esercizio: Come scrivere il programma CANZONE2.BAS 


L’esercizio che segue descrive i passi necessari per la creazione del program- 
ma CANZONE2.BAS (figura 7-2). Può essere utile seguire questi passi ogni 
volta che aggiungete un nuovo sottoprogramma al programma principale. 


1. Scegliete Nuovo dal menu File per iniziare un nuovo programma e digi- 
tate le righe comprese tra la numero 6 e la numero 15 della figura 7-2. 


2. Posizionate il cursore sulla chiamata al sottoprogramma Ritornello (paro- 
la Ritornello) e selezionate Nuovo SUB dal menu Modifica per aprire la 


seguente finestra di dialogo: 


Muova SUB 


dome : 


<Quida> 


«Annulla? 


KSOKE 


3. Se nella finestra di dialogo appare un altro nome (oppure se non appare 
nulla) se ne può specificare uno digitandolo nella finestra. In questo caso 
il nome del sottoprogramma è già presente e perciò basta premere Invio 
per aprire una finestra per il nuovo sottoprogramma. 
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L. ù CANZONEZ. BASO rr. -- - 
.. Questo Programma mostra. le parole della « ‘canzone "doh Bromn" . - i 


ona sug Ritornello 00. 


Dichiara. i | sottoprogramma Ritornello . 


10 Pi RINT IT "John Broni giace i ton da sel in | Prima strofa 
11 PRINT "dopo una lunga lotta contro ]' ‘oppressor. .......’— 
12 PRINT "John Brown giace. nella tomba la nel pian __.... 
— 13 PRIN - ma i ‘anima: vive ancor. .....II\I\)à) Ò\I 


INT "con 1 19: suoi compagni di valor _.. strofa. 
INT "dall Est all Ovest la Virginia. conquistò" | . .. 
Il - icon 19 suoi. "compagni di. valor" - _ 
PRINT "ma 1 Li anima. vive ___ ____ 


cn Ritornello "i "Chiama il programma rel ativo. 


24. INPUT "Premere. Invio | per er continuare..." _ _. _° 


PRIN Poi. lo Hanna ucciso ‘come _ un i ita "Terza strofa 
T "ma traditore fu colui che lo. impiccò;" i... .ÒÒ. 
PRINT "poi lo hanno ucciso. come fosse un tradito i +é.| 
RINTO “ma L ‘anima vive ancor. _.;_ .—.>—... 


[32 Ritornello "i ‘chia ama. Di programma relativ vo 1 o - \b___ 


234 PRINT John È front è morto: ma dl schiavo è cin n 1iberta®. da. 
35 PRINT "tutti. fratelli bianchi e neri siamo. già. \_{{ 
RO "John. Brown è morto. ma. lo schiavo è 


[55 romeno Di “___- 


- i 3 SUB Ritornello.  —. _. i uu . 


Figura 7-2. Un programma che stampa le parole della canzone “John Brown” 
usando il sottoprogramma Ritornello (continua). 
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a i .»_; o - 
45. A. sottoprogranna Ri tornelTo stampa il ritornello. della canzone. _ i 
John Brown" i«—ozàìà_ì_°Ò__ n___’000 ’‘’. ll i —-- 
46 PRINT tg A“ 
148 PRINT icon. glory L__..... pé 


149 PRINT “Glory, glory alleluia 0 
| 50 PRINT "Glory, glory. cr . LI 
| 51 PRINT “ma t anima | Vive ancor 


e 
i 
(54 ENDS 508. 


Figura 7-2. Un programma che stampa le parole della canzone “John Brown” usan- 
do il sottoprogramma Ritornello. 


FRA pui 


- pit torne! lo o | CHIAMATA AL - SOTTOPROGRAMMA 


CI FINE PROGRAMMA È PRINCIPALE | 


SUB Ritornello INIZIO DEL£ SOTTOPROGRAMMA 


PRINT. - ___... 

- PRINT “Glory, bu alla itori 

- PRINT "Glory, glory alleluia" 

| PRINT "Glory, glory alleluia" 

PRINT "ma. L ‘anima vive ancor 

POPRINT. - 

ENDS SUB FINE DEL SOTTOPROGRAMMA _. 


Figura 7-3. Le componenti di una tipica definizione e chiamata di un sottoprogram- 
ma. 


4. Poiché nonci sono parametri da elencare si può premere Invio per inizia- 


re una nuova riga. Si noti che la barra del titolo mostra il nome del pro- 
gramma e quello della procedura, separati da due punti. 


5. Scrivete il corpo del sottoprogramma (righe da 44 a 53 della figura 7-2). 
Si noti che QBasic aggiunge automaticamente la riga 54 (l’enunciato 
END SUB). Il vostro schermo dovrebbe ora apparire in questo modo: 
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gerca lisegui Mebug dpzioni 


File Modifica WUeintzaA | Cerca Esegui Debug Opzioni 
Senza titolo:Ritornello 


Senza titolo:Ritornello 


(SUB Ritornello SUBa 


END SUB 


| Scegliere il programma da modificare 


| Senza titolo 
Ritornello 


| Senza titolo è il Modulo principale 


BFinestra fttiva {Il imina> CAmnulla> <Quida> 


Immediat i l o Immediato 


_Maius+F1-Guida><F6=Finestra)<FZ=SubsY<F5=EseguiY<F8=Passod aRBGI :G15Ì Fi=Guida Invio=Esegui Esc-Amulla Tab=Campo seg. Freccia=Voce seg. 


Ne Tca __lehug E 
[SUB Ritornello Senza titolo Ritornello IRE 7. Usate i tasti di direzione per evidenziare il programma principale (al mo- 
ian sii h mento Senza titolo) e premete Invio. QBasic mostra il programma prin- 
sottoprogramma Ri : s iù wii R ; METE 5 ; La î ; a 
ttornello stampa il ritornello della canzone "Jolm Broun" cipale nella Finestra di digitazione e riposiziona il cursore sulla riga in 


A cui lo avevate lasciato. 

,Glory»; glory alleluia" è Pitoknetle È 
Glory, glory alleluia" i : i 1 
"Glory, glory alleluia” . 8. Salvate il programma col nome CANZONE2.BAS. Notate che prima di 
ma l’anima vive ancor" 0 salvare il programma su disco QBasic inserisce un enunciato DECLARE 
- in cima al programma (riga 4 della figura 7-2). A questo punto lo scher- 


mo dovrebbe apparire come riportato nella figura di pagina seguente. 


9. Spostate il cursore sulla riga immediatamente sopra la chiamata del sotto- 
programma Ritornello e digitate il resto del programma (righe da 16 a 41 
della figura 7-2). 


10. Aggiungete le righe 1, 2, 3 e 5 in cima al programma e salvatelo. 


Una volta completate queste fasi eseguite il programma premendo con- 
temporaneamente Maiusc+F5 e osservate le schermate delle parole della 
6 Selen icon sa NATO canzone. Il risultato dovrebbe essere identico a quello del programma CAN- 

ui. al menu Visualizza per vedere una fine- ZONE.BAS; in caso contrario confrontatelo con il listato della figura 7-2 € 

Gua programma principale, i sottoprogrammi e le fate gli opportuni cambiamenti. Il programma CANZONE2.BAS è un po’ più 

SR OEAnMMa, lungo di quelli visti fino ad ora per cui gli errori di battitura possono essere 
più difficili da trovare. 


SMaius+Pi-Guida%<F6-Finestra}<F2=Subs)<F5=Esegui)<F8=Passo} A0011:001 
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File Modifica Visualizza Cerca Esegui Debug Opzioni 
CANZONEZ .BAS 
(DECLARE SUB Ritornello (0) — 


(1) C) * O a 
ii Brown giace nella tomba là nel pian" * Prima strofa 
"dopo una lunga lotta contro l’oppressor," 
John Broun giace nella tomba là nel pian" 
PRINT "ma l’anima vive ancor." 


(Ritornello * Chiama il programma relativo 


SMaius+Fi-Guida?<F6=Finestra)<F2=Suhs}<F5=Esegui}<F8=Passo> I Gooii:661; 


Questo programma dimostra una regola generale: quando i programmi 
sono lunghi ci vuole più tempo per renderli operativi. Non bisogna scorag- 
giarsi: il capitolo 12 affronterà in dettaglio il problema del debugging e della 
correzione dei principali errori di programmazione. 


USO DI VARIABILI CON PROCEDURE 


Fino ad ora abbiamo usato un ristretto gruppo di variabili; ciò non si verifica 
quando si scrivono programmi più complessi. Per aiutare a tenere sotto con- 
trollo grandi quantità di variabili, QBasic contiene alcune regole speciali che 
riguardano l’uso delle variabili all’interno delle procedure. In questa sezione 
vedremo queste regole sviluppando il concetto di variabili locali e globali e 
analizzando come passano da una procedura all’altra. 


Variabili locali e globali 


QBasic classifica le variabili in due gruppi: globali e locali. Una variabile 
globale viene dichiarata nel programma principale e cambia valore in base al- 
le indicazioni del programma principale e delle procedure. Una variabile lo- 
cale viene dichiarata nel programma principale, in un sottoprogramma o in 
una funzione ed è valida solo nella procedura in cui viene dichiarata; questo 
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tipo di variabile non risente di cambiamenti effettuati al di fuori della proce- 
dura a cui appartiene. 

In questo modo è possibile usare variabili importanti in una qualunque 
parte del programma (globalmente) e variabili meno importanti solo all’inter- 
no di una procedura (localmente); mantenendo questa distinzione è possibile 
scrivere più righe di codice in forma modulare. Poiché le variabili locali sono 
confinate all’interno delle proprie procedure, i programmi che le usano hanno 
obiettivi più generali di quelli che si servono di variabili globali. 


Dichiarazione di variabili globali 


Per dichiarare una variabile globale si colloca un enunciato COMMON SHA- 
RED all’inizio del programma principale. Questa dichiarazione consente di 
usare o modificare una variabile sia all’interno del programma sia all’interno 
delle procedure. Questo enunciato non assegna un valore alla variabile. I va- 
lori vengono infatti assegnati successivamente per mezzo di enunciati di asse- 
gnamento. La sintassi dell’enunciato COMMON SHARED è la seguente: 


COMMON SHARED variabileLista 


variabileLista è una lista di una o più variabili separate da una virgola. 
Un enunciato COMMON SHARED può contenere un qualsiasi numero di 
variabili. | 


Esercizio: Uso di variabili globali 


Il programma GLOBALE.BAS (figura 7-4) mostra come la variabile globale 
gioco$ viene dichiarata nel programma principale e modificata dal sottopro- 
gramma NuovoGioco. 

Scrivete ed eseguite il programma GLOBALE.BAS, ottenendo questo ri- 
sultato: 
Nel programma principale, gioco$ = Scacchi 
Nel sottoprogramma NuovoGioco, gioco$ = Backgammon 
Di nuovo nel programma principale, gioco$ = Scacchi e Backgammon 


Il programma mostra che qualunque cambiamento apportato alla variabi- 
le globale gioco$ si riflette in tutto il programma. 
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Questo programma mostra T'uso di una variabile globale /G/G/G/ 


SUB NuovoGioco ()' dichiara il sottoprogramma NuovoGioco _ 


ioco$ variabile globale © 


va 1z za nel 
sottoprogramma 


gioco$ ' visual. 


“nel programma principale 


Figura 7-4. Un programma che mostra l’uso di una variabile globale in un pro- 
gramma. 


Dichiarazione di variabili locali 


Le variabili sono locali per definizione il che significa che non bisogna usare 
alcun enunciato particolare per dichiararle. Fino a questo momento tutte le 
variabili dichiarate sono state variabili locali. 


Esercizio: Uso di variabili locali 


Il programma LOCALE.BAS (figura 7-5) rimuove l’enunciato COMMON 
SHARED dal programma GLOBALE.BAS per dimostrare che una variabile 
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locale contenuta nel programma principale e una contenuta in un sottopro- 
gramma non interagiscono tra loro. Entrambe le variabili sono dette gioco$ 
ed entrambe sono variabili stringa ma, nonostante questo, sono completamen- 
te indipendenti l’una dall’altra. | 

Modificate il programma GLOBALE.BAS in modo che corrisponda a 
LOCALE.BAS ed eseguitelo. Otterrete i seguenti risultati: 


Nel programma principale, gioco$ = Scacchi 
Nel sottoprogramma NuovoGioco, gioco$ = e Backgammon 
Di nuoco nel programma principale, gioco$ = Scacchi 


Come potete vedere le modifiche apportate a gioco$ nel sottoprograrmma 
NuovoGioco non si riflettono sulla variabile gioco$ contenuta nel programma 


principale. 


Figura 7-5. Un programma che mostra l’uso di una variabile locale in un program- 
ma. 
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Trasferimento di argomenti a un sottoprogramma 


E possibile accedere a un qualsiasi numero di variabili dichiarandole come 
globali. Per quanto conveniente, questo metodo aumenta il rischio che una 
variabile venga accidentalmente modificata in qualche parte del programma. 
Per questa ragione QBasic fornisce uno strumento per condividere argo- 

menti (come variabili, costanti e risultati di espressioni e funzioni) con un nu- 
mero limitato di sottoprogrammi piuttosto che con tutto il programma. 
Questo metodo di condivisione viene detto passaggio di argomenti. 

| Gli argomenti passati a un sottoprogramma vengono ricevuti da parame- 
tr rappresentati da variabili locali interne al sottoprogramma; queste variabili 
vengono usate in modo del tutto simile alle altre. 


Argomenti contro parametri 


Cerchiamo di spiegare la differenza tra argomenti e parametri: 


i Un argomento è una costante, una variabile o un’espressione passata 
a un sottoprogramma. I nomi di argomento appaiono dopo il nome del 
sottoprogramma nella chiamata a una procedura. Una raccolta di argo- 
menti viene detta elenco di argomenti. 


S Un parametro è una variabile che riceve un valore passato a un sot- 
toprogramma. I parametri appaiono negli enunciati SUB e DECLARE e 
seguono le regole applicate a tipi di dati standard. Una raccolta di para- 
metri viene detta l’elenco di parametri. 


A ogni argomento deve corrispondere un parametro (non necessariamen- 
te con lo stesso nome); la figura 7-6 mostra la relazione tra un elenco di argo- 
menti e un elenco di parametri. 


Argomenti 


CHIAMATA DEL SOTTOPROGRAMMA [ 


ll. MostraValori persona$, età%, "F" 


\ \ Parametri 


SUB MostraValori (nome$, età%, sesso$) 
DEFINIZIONE DEL SOTTOPROGRAMMA I 


Figura 7-6. Relazione tra argomenti e parametri. 


164 


Capitolo 7 - Creare sottoprogrammi e funzioni proprie 


L'elenco che segue mostra alcune combinazioni argomento-parametro 
ammesse: 


GetInput nome$, numero$, indirizzo$ 
SUB GetInput (persona$, telefono$, indirizzo$) 
TradNorvegese maiale$, cane$ 


SUB TradNorvegese (gris$, hund$) 


StampaIntest ORA$, DATA$, Titolo$, NumPag% 


i 


SUB StampaIntest (oraCorrente$, dataCorrente$, Titolo$, num%&) 


ChiamataMista testoInt%, testoStringa%, VALORE!, "Ciao", 747 
e a 0 Ù DE i 
SUB ChiamataMista (a%, b$, v!, d$, e% 


Modifica di argomenti 


Il passaggio di argomenti a un sottoprogramma non avviene in un’unica dire- 
zione. Qualunque valore che un sottoprogramma assegna a un parametro vie- 
ne restituito all’argomento abbinato quando il sottoprogramma è terminato. 

Prendiamo come esempio la figura 7-6: se persona$ conteneva il valore 
Carla al momento della chiamata a MostraValori, il parametro nome avrebbe 
ricevuto quel valore. 

Se il sottoprogramma avesse poi assegnato il valore Giulia a nome$, que- 
sto valore sarebbe stato riassegnato a persona$, una volta completato il sotto- 
programma. 

Ricordate in ogni caso che costanti ed espressioni restano invariate; 1 loro 
valori non possono cambiare. Nella figura 7-6 per esempio, anche se il sotto- 
programma MostraValori modificasse il valore di sesso$, nulla succederebbe 
all’argomento corrispondente ("FF"). 


a Esercizio: Passaggio di argomenti a un sottoprogramma 


Il programma ARGOMENT.BAS (figura 7-7) mostra come due argomenti 
vengono passati al sottoprogramma AggInteresse. Il parametro meseNome$ 
riceve l’argomento mese$ mentre il parametro totale! riceve l’argomento bi- 
lancio!. Successivamente il sottoprogramma AggInteresse modifica il mese, 
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moltiplica il valore di totale! per 1.05 e restituisce entrambi i valori al pro- 
gramma principale. 


Figura 7-7. Un programma che mostra il passaggio di argomenti a un sottopro- 
gramma. 


Scrivete il programma ARGOMENT.BAS ed eseguitelo; dovreste otte- 
nere il seguente risultato: 


Prima del sottoprogramma: 
mese$ = Gennaio 
bilancio! = 1500 
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Dopo il sottoprogramma: 
mese$ = Febbraio 
bilancio! = 1575 


In questo esempio le funzioni mese$ e bilancio! sono state modificate 
senza ricorrere a variabili globali. 


CREAZIONE DI FUNZIONI 


Una funzione è un blocco di codice compreso tra gli enunciati FUNCTION 
ed END FUNCTION. Le funzioni seguono le stesse regole dei sottoprogram- 
mi, con la differenza che una funzione esegue un compito e restituisce un va- 
lore al programma principale o alla procedura di chiamata. Queste funzioni 
vengono usate in modo del tutto simile alle funzioni interne di QBasic, cioè 
inserendole in un enunciato. In questo paragrafo vedremo come creare delle 
funzioni personali (dette funzioni definite dall’utente). 


Sintassi di una funzione 
La sintassi di una funzione è questa: 


FUNCTION NomeFunzione (parametroLista) 
dichiarazione di variabile locale e di costante 
enunciati di funzione 
NomeFunzione = valoreRestituito 

END FUNCTION | 


BS FUNCTIONèlVenunciato che indica l’inizio della definizione di una fun- 
zione. 


i NomeFunzioneèil nome della funzione che deve terminare con un carat- 
tere di dichiarazione del tipo (come si fa per il nome di una variabile). Il 
nome della funzione può avere una lunghezza massima di 40 caratteri e 
viene usato per chiamare la funzione. Il nome della funzione non può es- 
sere un parola chiave di QBasic o lo stesso nome di una variabile o di una 
procedura del programma. 


Bi (parametroLista)è un elenco facoltativo di variabili 


8 dichiarazione di variabile locale e di costante è un elenco facoltativo di 
variabili e costanti dichiarate e usate nella funzione. Esse non hanno al- 
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cun effetto su variabili o costanti con lo stesso nome in altre parti del pro- 
gramma. 


BM enunciati di funzione è la parte operativa della funzione, nella quale si 
possono usare la maggior parte degli enunciati di QBasic. 


Mm NomeFunzione = valoreRestituito è un enunciato di assegnazione nel 
corpo della funzione (generalmente alla fine) che imposta i valori resti- 
tuiti dalla funzione stessa. valoreRestituito può essere una variabile o il 
risultato di un’espressione o di un’altra funzione. NomeF unzione e valo- 
reRestituito devono essere dello stesso tipo. 


3 END FUNCTION è V’enunciato di QBasic che indica la fine della defini- 
zione di una funzione. 


Per vedere come funzionano questi elementi esaminiamo la chiamata se- 
guente, che passa tre argomenti interi e restituisce un valore intero assegnato 
alla variabile numero%: 


numero = SommaDiValori% (a&, b&, c&) 


Notate che il nome della funzione SommaDiValori% contiene un caratte- 
re di dichiarazione del tipo intero uguale a quello nella variabile numero%. 
Una funzione definita dall’utente restituisce un valore corrispondente a uno 
dei cinque tipi di dati disponibili in QBasic: stringa, intero, intero lungo, in 
virgola mobile a precisione singola, in virgola mobile a precisione doppia. 


Creazione di una funzione 


La creazione di una funzione definita dall’utente è molto simile a quella di 
un sottoprogramma: 


1. Si usa il comando Nuova FUNCTION dal menu Modifica per inserire la 
funzione (così come si usa Nuova SUB per inserire un nuovo sottopro- 
gramma). 


2. Si usa il comando SUBs dal menu Visualizza per esaminare e modificare 


le funzioni, nello stesso modo visto per i sottoprogrammi. 


Esercizio: Uso di una funzione definita dall’utente 


Il programma MEDIA.BAS (figura 7-8) mostra molti degli elementi di una 
funzione definita dall’utente nella dichiarazione della funzione Media!. Me- 
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dia! restituisce la media di tre parametri interi passati alla funzione stessa. 
Una volta eseguita la funzione, il nome Media! viene a rappresentare un valo- 
re in virgola mobile a precisione singola all’interno del programma i 
le, che può essere assegnato a una variabile in virgola mobile o visualizzato 


con un enunciato PRINT. 


Figura 7-8. Un programma che stampa il valore restituito da una funzione. 


Dopo aver scritto ed eseguito il programma MEDIA.BAS, otterrete un 
output simile a questo: 


Inserire tre numeri di cui si vuole la media. 
Primo intero: 10 
Secondo intero: 20 
Terzo intero: 30 

La media è 26.66667 
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Funzioni e sottoprogrammi a confronto 


Le funzioni e i sottoprogrammi presentano una serie di caratteristiche comu- 
ni: 


Bi La chiamata a una funzione contiene lo stesso numero di argomenti pre- 
senti nell’elenco di parametri della funzione stessa. 


8 L'elenco di parametri di una funzione riceve valori passati dal program- 
ma principale o da procedure di chiamata a cui vengono assegnati dei no- 
mi di variabili così da poterli usare nel corpo della funzione. 


3 Una funzione può dichiarare e usare variabili locali e costanti. 


3 Una funzione viene dichiarata vicino all’inizio del programma principale 
con un enunciato DECLARE, generata automaticamente da QBasic. 


Una funzione viene conservata separatamente nell’ambiente QBasic ed è 
accessibile col comando SUBs nel menu Visualizza. 


Bi Le funzioni vi aiutano a strutturare i programmi in moduli e a evitare la 
ripetizione di parti di codice. 


QUALE BISOGNA USARE? 


Dopo questo capitolo sarete portati a pensare che sottoprogrammi e funzioni 
siano essenzialmente la stessa cosa: entrambi sono Strutture di program- 
mazione flessibili che possono gestire compiti diversificati restituendo uno o 
più valori al modulo di chiamata. Quali sono allora le effettive differenze tra 


sottoprogrammi e funzioni e quale usare in un determinato contesto di pro- 
grammazione? 


Un sottoprogramma è un mini programma 


Si può pensare a un sottoprogramma come a un programma autonomo che 
deve svolgere un compito importante all’interno di un programma ed essere 
abbastanza generico da poter essere impiegato per altri progetti. I sottopro- 
grammi sono spesso più lunghi delle funzioni e vengono generalmente usati 
quando l’informazione dev'essere visualizzata sullo schermo. 


In generale, è meglio servirsi dei sottoprogrammi per eseguire compiti quali: 
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Ricevere informazioni dall’utente. 
Visualizzare informazioni sullo schermo. 
Elaborare molti valori numerici o stringhe. 
Disegnare forme grafiche o disegni. 


Eseguire note musicali o canzoni. 


Restituire valori multipli ai moduli di chiamata. 
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Una funzione restituisce un valore 


Una funzione è particolarmente utile nel calcolare e restituire al programma 
principale un valore singolo; le funzioni non sono adatte per restituire valori 


multipli o eseguire compiti di carattere generale. Ecco un elenco di compiti 
per cui è preferibile l’uso di una funzione: 


Eseguire un calcolo numerico. 
Restituire un valore stringa. 
Generare un numero a caso. 
Convertire un valore in un altro. 


Valutare un’espressione logica e restituire un valore vero o falso. 


Calcolare un risultato da più argomenti. 


Il programma principale gestisce dichiarazioni e controlli 


Quali sono i compiti del programma principale? In realtà non molti se si fa 


largo uso di sottoprogrammi e funzioni. Questo elenco mostra alcuni dei 
compiti del programma principale: 


Commenti e spiegazioni introduttive. 


3 Inizializzazione di variabili e strutture chiave. 
i Codicedaeseguire una sola volta. 
El 


Strutture di controllo del flusso che determinano il percorso di esecuzio- 
ne del programma. 


Le dichiarazioni seguenti devono essere incluse nel programma principa- 
le se sono parte del programma: 


Bi Dichiarazioni di variabili globali e costanti. 


Dichiarazioni di sottoprogrammi e funzioni. 


L uso di un programma principale, di sottoprogrammi e funzioni permet- 
te di scrivere programmi modulari e meglio organizzati. 
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SOMMARIO 


In questo capitolo abbiamo esaminato sottoprogrammi e funzioni, che sono 
due strutture di programmazione che vi permettono di evitare ripetizioni. I 
sottoprogrammi vengonodefiniti tra gli enunciati SUB e END SUB, mentre le 
funzioni tra FUNCTION ed END FUNCTION; entrambe queste procedure si 
inseriscono, e se ne conserva traccia, con il sistema di menu di QBasic. En- 
trambe supportano variabili locali e scambio di argomenti dal modulo di chia- 
mata. Sottoprogrammi e funzioni, combinati con le strutture di controllo del 
flusso e di looping (viste nei capitoli 5 e 6), rappresentano un set completo di 
strumenti per scrivere programmi strutturati e ben organizzati. 


DOMANDE ED ESERCIZI 
1. Quali, tra i seguenti, sono vantaggi che derivano dall’uso delle proce- 
dure? 


a. Le procedure possono essere chiamate un numero indefinito di volte. 
b. Le procedure permettono di creare propri enunciati e funzioni. 
c. Le procedure facilitano lo sviluppo di un programma. 


d. Le procedure generali possono essere incorporate in altri progetti di 
programmazione. 


2. Dov'è l’errore in questo enunciato SUB? 
SUB ScriviNome$ (Nome$, Cognome$) 


3. Qualèla scorciatoia di tastiera del comando SUBs nel menu Visualizza? 


4. Quale comando di menu si può usare per eseguire un’intera procedura in 
una sola volta? 


5. Scrivete un enunciato che dichiara una variabile globale dal nome tota- 
le%o. 


6. Qualè la differenza tra un sottoprogramma e una funzione? 


7. Scrivete un sottoprogramma dal nome /nfoAuto che chiede all’utente la 
marca, il modello, l’anno e il colore della sua auto e restituisce queste in- 
formazioni nel programma principale in quattro variabili. Una volta ter- 
minato scrivete un enunciato che chiama il sottoprogramma /InfoAuto. 
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Scrivete una funzione dal nome TrovaMaggiore% che accetta due argo- 
menti interi e restituisce quello più grande al modulo di chiamata. Una 


volta terminato scrivete un enunciato che chiama la funzione TrovaMag- 
giore%. 


Scrivete un programma che usa dei sottoprogrammi per stampare una 
raccolta di caratteri disposti in modo da formare tre figure: una riga, un 
rettangolo o un triangolo. 


EE. TTT TT... 


PESO CURIA ASIA ARIAS IRSA LI SIINO IZII1 
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Dopo aver esaminato l’uso di semplici tipi di dati e variabili vediamo come 
QBasic gestisce grandi quantità di dati all’interno di un programma. Le tecni- 
che esposte in questo capitolo si riveleranno molto utili per creare strutture di 
dati (cioè raccolte di singoli elementi di informazione) che vi aiuteranno a or- 
ganizzare grandi quantità di informazioni e a velocizzare operazioni che im- 
plicano molte variabili. 


CONSERVAZIONE E RECUPERO 
DI INFORMAZIONI 


Conoscete tre modi per immagazzinare dei valori all’interno di un program- 
ma: 


BI Assegnando un valore a una costante: 
CONST PREZZO! = 12.950 
Bi Assegnando un valore a una variabile: 


Nome$ = "Antonio" 


Bì Assegnandoun valore a una variabile con l’enunciato INPUT: 
it S 
INPUT "Scrivere il numero di casa: ", numCasa& 


Questi sono tutti valori singoli. Cosa succede se si dispone di molti valori 
che si pensa di usare molte volte e in un ordine specifico? In questi casi si ri- 
corre agli enunciati DATA e READ. 


Uso degli enunciati DATA e READ 


Gli enunciati DATA e READ permettono di immagazzinare e recuperare in- 
formazioni all’interno di un programma: i valori vengono prima immagazzi- 
nati in uno 0 più enunciati DATA e poi vengono assegnati a variabili per 
mezzo di uno o più enunciati READ. La sintassi di questi due enunciati è la 
seguente: 


READ variabileLista 
DATA costantelista 


variabileLista è un elenco di una o più variabili separate da una virgola; 
costanteLista è un elenco di uno o più valori numerici o stringhe separate da 
una virgola. Ogni valore nell’enunciato DATA deve avere una corrisponden- 
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te variabile di tipo appropriato nell’enunciato READ. Per esempio, quella che 
segue è una coppia corretta di enunciati DATA e READ. Notate come 1 valo- 
ri appaiono nello stesso ordine delle variabili. 


READ nome$, anni% 


DATA Gianni Scotti, 25 


L’esempio che segue mostra il funzionamento di READ e DATA: in 
questo programma l’enunciato READ assegna 11 primo valore DATA alla va- 
riabile stringa nome$ e il secondo alla variabile intera anni%. L’enunciato 
PRINT utilizza poi le variabili. | 


READ nome$, anni% 
PRINT nome$: " ha"; anni%; "anni." 
DATA Gianni Scotti, 25 


Quando il programma viene eseguito si ottiene il seguente risultato: 
Gianni Scotti ha 25 anni 


La figura 8-1 mostra come i valori vengono assegnati alle variabili. 


READ nome$, anni% 


PRINT nome$: " ha\& anni%&; "anni." 


DATA Gianni Scotti, 25 


Figura 8-1. / valori conservati nell’ enunciato DATA vengono assegnati alle variabili 
con un enunciato READ. 


Affermazioni DATA e READ: suggerimenti 


Nell’usare gli enunciati DATA e READ per immagazzinare e recuperare in- 
formazioni è bene tenere a mente i seguenti punti: 


sm È possibile creare più enunciati DATA e READ, ma bisogna assicurarsi 
che ogni variabile READ abbia un corrispondente valore DATA: 


READ mese$, numeroDi Giorni& 
READ vacanze% 


DATA Novembre 
DATA 30, 3 
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8 Seun valore nell’enunciato DATA contiene una virgola, un segno di due 
punti o un certo numero di spazi, l’intero valore dev’essere racchiuso tra 


virgolette: 
DATA " Totale —", "Portogruaro, Venezia" 
Spazi precedenti Spazi sùccessivi Virgola 


BM Glienunciati DATA devono comparire nel programma principale (ven- 
gono generalmente collocate alla fine). Gli enunciati READ devono esse- 
re collocati sopra quelli DATA nel programma principale ma, all’interno 
delle procedure possono apparire ovunque. 


Cosa succede se i tipi di dati non sono uguali? 


Ogni valore contenuto in un enunciato DATA deve essere assegnato a una 
corrispondente variabile dello stesso tipo in un enunciato READ. Se i tipi non 
corrispondono, QBasic effettua le seguenti conversioni: 


Se il valore Ma la variabile 


Il risultato della 
DATA è READ è conversione è 
stringa intero/virgola mobile errore di sintassi 
intero/virgola mobile Stringa stringa 
intero virgola mobile virgola mobile 
virgola mobile intero arrotondato all’intero 


Un errore di sintassi viene indicato da questa finestra di dialogo: 


Errore di sintassi 


i BOH  <Guida> 
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Il programma che segue mostra una discrepanza di tipo tra il valore DA- 
TA (una stringa) e la variabile READ (un intero). 


READ nome$ 

PRINT "Nome: "; nome$ 

READ indirizzo$ 

PRINT "Indirizzo: ": indirizzo$ 

READ anni% 

PRINT "Età: "; anni% 

DATA Gianni Scotti, "Via Roma 9, Ravenna", nove 


AI momento dell’esecuzione la schermata di output mostra brevemente 
questo risultato: 


Nome: Gianni Scotti 
Indirizzo: Via Roma 9, Ravenna 


Subito dopo appare il messaggio errore di sintassi perché l’enunciato 
READ non può assegnare un valore stringa (nove) a una variabile intera (an- 
ni%). Per correggere il programma basta cambiare nove con 9, perché con- 
cordi con la variabile intera anni% o cambiare anni% con anni$ perché 
concordi con il valore stringa nove. 


179 


Lea 


IL LIBRO DEL QBASIC MS-DOS 


Esercizio: Immagazzinare molti valori 


Il programma AGGIUNGI.BAS (figura 8-2) mostra come usare un enuncia- 
to READ all’interno di un loop FOR per assegnare più valori DATA a delle 
variabili. Si noti che la costante intera ELEMENTI% controlla il numero di 
elementi letti dagli enunciati DATA; modificando ELEMENTI% è perciò 
possibile cambiare il numero di elementi da leggere. 


1. Scrivete ed eseguite il programma AGGIUNGI.BAS 

PO AGGIUNGI.BAS. ... 

- Questo programma. i legge. e aggiunge - i i valori. conservati 
do enunciati. DATA. LZ... l __ 


LA it i mare i ti i tm 


For 15 _ L TO ELEMENTIS . "per. ogni. ‘elemento da le - 

I READ numero! "assegna il successivo. elemento. DATA a numerot 

— somma! = “somma! + NUmEro! ‘aggiunge LL ‘elemento al totale corrente. 
Li is _’‘Ò@quq .... . - 0Ò0Ò0Ò0Ò0°0°0 
DPRINT "la ‘somma. Li ELEMENTI: numeri -——. i 
DATA 1, 2,3,4,5,6, 1,89 

e 88. 2 25, Si 3, 100, aL . 


Figura 3-2. Un programma che usa READ per assegnare 20 elementi alle variabili. 


L'’output del programma mostrerà il seguente risultato: 


La somma di 20 numeri è 134.0967 


Di Cambiate Il valore della costante ELEMENTI% a 4 ed eseguite di nuovo 
il programma; avrete sullo schermo il seguente risultato: 


La somma di 4 numeri è 10 


L’indicatore di fine dati 


Se il programma non è in grado di identificare l’ultimo valore DATA conti- 
nua ad eseguire gli enunciati READ (cercando di assegnare un valore a una 
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variabile). Il risultato che ne consegue è un messaggio di errore che indica 
che nessun dato è disponibile per l'assegnazione: 


| Valori dell'istruzione DATA esauriti o 
| Box <Guida> o 


Per evitare questo errore inserite un indicatore di fine dati come ultima 
voce dell’ultimo enunciato DATA; Il programma si serve di tale valore per 
determinare il punto in cui terminano i valori DATA. Quando il programma 
legge l’identificatore, passa a eseguire il restante codice. Questa tecnica è uti- 
le quando si dispone di una lunga lista di valori all’interno di enunciati DA- 
TA che verrà elaborata solo una volta. Il programma AGGIUNGI.BAS 

i aggira questo potenziale problema perché usa una costante che contiene un 
numero di valori che corrisponde esattamente al limite superiore del ciclo 
FOR. Non potrete godere spesso di un simile lusso! Nell’esercizio che segue 
AGGIUNGI.BAS viene modificato perché possa leggere un indicatore di fine 


dati. 


Esercizio: Inserimento di un indicatore di fine dati 


lea Il programma AGGIUNG2.BAS (figura 8-3) usa un indicatore di fine dati 
(-9999) come ultima voce dell’enunciato DATA nel programma. Scrivete ed 


eseguite il programma AGGIUNG2.BAS: 
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Figura 8-3. Un programma che legge i dati fino al raggiungimento dell’ indicatore 
di fine dati. 


Lo schermo dovrebbe mostrare il seguente risultato: 


La somma di 20 numeri è 134.0967 


Rileggere i valori DATA con l’enunciato RESTORE 


À volte può essere necessario leggere ripetutamente la lista di valori DATA 
in un programma: per esempio potreste voler eseguire una serie di calcoli di- 
versi su uno stesso gruppo di valori. Per ritornare al primo dei valori DATA 
servitevi dell’enunciato RESTORE che reimposta il puntatore dei dati sul pri- 


mo valore dell’enunciato DATA contenuto nel programma. RESTORE può 
essere usato un numero indefinito di volte. 


La sintassi dell’enunciato RESTORE: 
RESTORE 


182 


Le 


Capitolo 8 - Lavorare con grandi quantità di informazioni 


Esercizio: Uso di RESTORE per ripetere un elenco di valori. 


Il programma ORETV.BAS (figura 8-4) usa RESTORE, DATA e READ per 
controllare quante ore una persona passa davanti al televisore durante un pe- 
riodo di tre settimane. Una coppia di loop FOR nidificati scorre per tre volte i 
giorni della settimana (per simulare tre settimane) registrando il numero tota- 
le di ore di visione. L’enunciato RESTORE collocato alla fine di ogni ciclo 
riporta il puntatore al primo giorno (in questo caso domenica). 


NOTA: Per vivacizzare il risultato sullo schermo si è 
usato l’ enunciato COLOR che visualizza il numero tota- 
le di ore trascorse davanti al video in rosso lampeggian- 
te; naturalmente potrete vedere questo effetto solo se disponete di 
un monitor a colori. 


1. Scrivete ed eseguite il programma ORETV.BAS; alla fine riceverete tre 
richieste di informazioni simili a queste: 


Quante ore avete passato davanti alla TV nelle ultime 3 
settimane? 

Domenica, Settimanal --> 2 

Lunedi', Settimana 1 --> 0 

Martedi', Settimana 1 --> 1 

Mercoledi', Settimana 1 --> 0 

Giovedi', Settimana 1 --> 2 

Venerdi', Settimana 1 --> 0 

Sabato, Settimana 1 --> 2.5 


2. Rispondete alle domande e, dopo aver completato i 21 valori, lo schermo 
output mostrerà il risultato finale in questa forma: 


Avete guardato 23.5 ore di televisione nelle ultime tre 
settimane! 


Dopo aver imparato a immagazzinare e recuperare grandi quantità di va- 
lori esaminiamo i modi più efficienti per la loro gestione. Il paragrafo che se- 
gue introduce la matrice (array), un potente strumento di strutturazione dei 
dati che può aiutare a gestire grandi quantità di informazioni dello stesso tipo. 


LE MATRICI 
Le matrici servono per organizzare sotto uno stesso nome variabili dello stes- 
so tipo. 
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car ORETV. BAS : _. _..... o 
i programma usa DATA, ‘READ | e - RESTORE. per controllare > ‘numero 
i I. ore trascorse davanti alla Li in un io di tre. settimane. 0 


. oneri ia numero. di ore pero 


dal giorno. 


! Totale di i tutte) le ore _ì0 


Figura 8-4. Un programma che mostra l’uso dell’ enunciato RESTORE. 

Una matrice può contenere tutti i tipi di dati visti sino ad ora per cui si potran- 
no avere: 

Bi  Matricididatistringa. 

3  Matricididatiinteri. 

1  Matricididatiinteri lunghi. 

6 


Matrici di dati in virgola mobile a precisione singola. 
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8  Matricididatiin virgola mobile a precisione doppia. 


Non è possibile mescolare tipi diversi all’interno di una singola matrice 
(una matrice di stringhe può contenere solo stringhe e così via). 

Vedremo un esempio che organizza i dati in tre tipi di matrici: matrici di 
stringhe, matrici di interi e matrici di dati in virgola mobile a precisione sin- 
gola. 


Raccogliere informazioni con le matrici: 
il Mercato Della Bicicletta 


Il Mercato Della Bicicletta, un grosso negozio del centro, ha sette commessi. 
Lorenzo, il proprietario vuole registrare mensilmente due valori: 


Bi Numerodibiciclette vendute da ogni commesso. 
i Numero di lire fatturate da ogni commesso. 


Viene naturale organizzare queste informazioni in tre elenchi, come mo- 
stra la figura 8-5: 


Commesso Biciclette vendute Fatturato 


Fabio 2.600.000 
Andrea 3.000.000 
Sandro 4.600.000 
Emanuela 2.400.000 
Annalisa 5.200.000 
Paola 1.000.000 
Valerio 2.500.000 


Figura 8-5. Un esempio dei dati di vendita del Mercato Della Bicicletta. 


Una lista di valori stringa (i nomi dei commessi). 
& Unalistadi valori interi (il numero di biciclette vendute per persona). 


Una lista di valori in virgola mobile (il totale fatturato per ogni commes- 
SO). 


È evidente come Lorenzo nel redigere questi elenchi abbia già fatto uso 
di matrici. Addirittura di tre: una matrice di stringhe per i nomi delle persone, 
una matrice di interi per il numero di biciclette vendute e una matrice di dati 
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in virgola mobile a precisione singola per il denaro fatturato. Ogni elenco, 
con un suo differente tipo di informazione, si qualifica come una matrice che 
contiene sette elementi o valori individuali. Dopo aver organizzato le matrici 
su carta le si può convertire in un programma con l’aiuto dell’enunciato DIM. 


L’enunciato DIM: prenotare la matrice 


Quando si prenota un tavolo a un ristorante si forniscono delle informazioni 
in cambio della prenotazione: il nome, il tipo di pasto (colazione, pranzo o 
cena) e il numero dei convitati. Nel mondo delle matrici l’enunciato DIM 
svolge la stessa funzione di una prenotazione, fornendo lo spazio di memoria 
necessario per contenerla; in cambio richiede tre informazioni: 


3 Ilnomescelto per la matrice. 
3  Iltipodidatiche si intende inserirvi. 
Bi Il massimo numero di elementi che la matrice può contenere. 


Questo processo di allocazione dello spazio viene detto dimensionamen- 
to. La sintassi dell’enunciato DIM è la seguente: 


DIM nomeMatrice (coordinata) 


nomeMatrice è il nome scelto per la matrice e coordinata è il più alto ele- 
mento numerato che vi è contenuto. Il carattere finale di nomeMatrice de- 
v'essere il carattere di dichiarazione del tipo che identifica il tipo di dati 
contenuti nella matrice: $ per stringhe, % per interi, & per interi lunghi, / per 
numeri decimali (in virgola mobile) a precisione singola o # per numeri deci- 
mali (in virgola mobile) a precisione doppia. 

L’enunciato DIM di questo esempio dimensiona una matrice di stringhe 
che può contenere fino a 50 elementi numerati da 0 a 49: 


DIM statiUSA$ (49) 
| î___—_—’ ELEMENTONUMERATO PIÙ ALTO 
TIPO DI DATI DELLA MATRICE ($, %, !, &, #) 
NOME DELLA MATRICE 


b) . . 9 . : 
Al “momento dell’esecuzione di quest’enunciato DIM, QBasic riserva 
memoria per una matrice di 50 elementi che contiene i nomi degli stati ameri- 
cani. 
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NOTA: In genere, un computer ha spazio per molte ma- 
trici, contenenti anche migliaia di elementi. Tuttavia, 
poiché la memoria non è illimitata, è bene evitare di ri- 
servare spazio in più di quello strettamente necessario. 


Lorenzo potrebbe creare le tre matrici di cui ha bisogno usando questi 
enunciati DIM: 
ss Perinomi dei commessi una matrice di stringhe di sette elementi detta 
commessi$: 
DIM commessi$(6) 


& Peril numero di biciclette vendute un matrice di interi di sette elementi 
detta biciVendute%: 


DIM biciVendute%(6) 


8 Periltotale del fatturato una matrice di dati in virgola mobile a precisio- 
ne singola di sette elementi detta totVendite! 


DIM totVendite!(6) 


Notate che in tutte e tre le matrici il numero 6 riserva lo spazio di memo- 
ria necessario per sette elementi numerati da 0 a 6. 

Ogni elemento della matrice è associato a un numero. Per definizione 
QBasic associa il primo elemento di una matrice col numero 0, il secondo col 
numero 1 e così via per gli altri, come si vede nella figura 3-6. 


Array Array Array 
Commessi$ biciVendute% totVendite! 


Figura 8-6. Ogni elemento di una matrice dimensionata è associato a un numero. 


187 


Lear 


IL LIBRO DEL QBASIC MS-DOS 


Lavorare con gli elementi di una matrice 


Dopo aver dimensionato una matrice con l’enunciato DIM, è molto semplice 
far riferimento agli elementi in essa contenuti. Per indicare un elemento di 
una matrice si usa il nome della matrice e un indice di matrice racchiuso tra 
parentesi. L'indice deve essere un valore intero: un numero semplice o una 
variabile intera. L’enunciato seguente assegna il valore stringa Patate all’ele- 
mento 3 nella matrice listaSpesa$: 


listaSpesa$(3) = "Patate" 


Esercizio: Conservazione di valori in una matrice 


Il programma REGNOMI.BAS (figura 8-7) mostra come le informazioni 
vengono conservate in una matrice e stampate usando due loop FOR. La co- 
stante PERSONE % contiene il numero dei commessi del negozio di biciclette 
e OPTION BASE fa corrispondere il primo elemento di ogni matrice a 1 in- 
vece che a 0. 

Scrivete ed eseguite il programma REGNOMLBAS. Il programma ri- 
chiede di fornire i nomi dei commessi e produce un risultato simile a questo: 


_0p 


Inserire 
Inserire 
Inserire 
Inserire 
Inserire 
Inserire 
Inserire 
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1] 
il 
il 
1] 
1] 
il 
i] 


nome del 
nome del 
nome del 
nome del] 
nome del 
nome del] 
nome del 


commesso:Fabio 
commesso:Andrea 
commesso :Sandro 
commesso: Emanuela 
commesso:Annalisa 
commesso:Paola 
commesso:Valerio 


| ' REGNOM 


| ' Questo 


cON ST ‘PERSONE% 
TION BASE 1° 


T 


| DIM Commessi $ (PERSONE 


Figura 8-7. Un programma che mostra il caricamento e la stampa di una matrice. 


| ' di una matrice 
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es 
programma legge del] 


Avete inserito i nomi seguenti: 


Fabio 
Andrea 
Sandro 
Emanuela 
Annalisa 
Paola 
Valerio 
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Esercizio: Uso di più matrici in un programma 


Il programma INFOBICI.BAS (figura 8-8) mostra come usare più matrici per 
raccogliere informazioni correlate. INFOBICI è una semplice revisione di 
REGNOMI.BAS in cui i nomi dei commessi vengono registrati con la matri- 
ce commessi$, il numero di biciclette vendute da ognuno con la matrice bici- 
Vendute% e il fatturato di vendita di ciascuna persona con la matrice 
totVendite%. Le tre matrici vengono progettate per essere usate insieme 
(ognuna infatti contiene un’informazione sui commessi del negozio di bici- 
clette, come si vede nella figura 8-6). Se fate riferimento all’insieme degli in- 
dici di matrice in un loop FOR, il programma potrà accedere nello stesso 
momento agli elementi correlati. L’enunciato PRINT USING e il modello 
tmp$ visualizzano i dati contenuti in ciascuna matrice. 
Scrivete ed + il e INFOBICI.BAS. 


INFOBICI. RAS 


-. BASE 1 È da ii i. (1 matrici ad 1 . i 
DIM Commessi$ (PERSONE) - dimensiona Ta matrice di n Commessi 
— ii 


| recupera | 
NL comes) 


(oi i% = i TO PERSONE6. i, stampa. jc ‘co tenuti di. ogni matrice _ 
- pia USING i -Sarmes sa; diano dii i (i) 


Hani 8-8. Uso di tre matrici in un loop FOR. 
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L’output del programma dovrebbe essere simile a questo: i. È . . 
Inserire il nome del commesso: Fabio ISIN DISC PORCCIGLUDA AG dee 


Biciclette vendute: 6 
Totale vendite: L 2.600.000 


Non è necessario riempire una matrice completamente; anzi può essere una 
buona idea lasciare spazio per dati da inserire in futuro. In questo caso dovre- 
te trovare un modo per indicare a QBasic che l’utente ha terminato l’inseri- 
mento dei dati. Una soluzione è quella di inserire un indicatore di fine dati nel 
modo visto in precedenza. Potete fare in modo che l’utente aggiunga degli 
elementi alla matrice nell’ambito di un loop WHILE che controlla in conti- 
nuazione l’esistenza dell’indicatore di fine dati. Non appena QBasic legge 
l’indicatore esce dal loop ed esegue il resto del programma. L’indicatore do- 
vrebbe corrispondere al tipo di dati contenuti dalla matrice e dovrebbe avere 
un valore che sia improbabile che l’utente digiti durante la normale esecuzio- 
ne del programma. Un tipico indicatore di fine dati per una matrice di strin- 
ghe è ESCI o FINE, per una matrice numerica è -9999, 


Inserire il nome del commesso: Andrea 
Biciclette vendute: 5 
Totale vendite: L 3.000.000 


Inserire il nome del commesso: Sandro 
Biciclette vendute: 12 
Totale vendite: L 4.600.000 


Inserire il nome del commesso: Emanuela 
Biciclette vendute: 7 
Totale vendite: L 2.400.000 
RACER CA Esercizio: Uso di un indicatore di fine dati 
Biciclette vendute: 11 


Il programma FINEDATI.BAS (figura 8-9) mostra come riempire una matri- 


Totale vendite: L 5.200.000 ce con diverse quantità di dati. Il programma riempie e stampa tre matrici 
Inserire il nome del commesso: Paola che, questa volta, vengono dimensionate per contenere 50 elementi ciascuna e 
Biciclette vendute: ‘2 ° usa un indicatore di fine dati (FINE) per indicare che l’utente ha terminato 
l'inserimento dei dati (si noti che FINE deve essere in maiuscolo). Scrivete 


Totale vendite: L 1.500.000 
ed eseguite il programma FINEDATI BAS. 


Inserire il nome del commesso: Valerio Il risultato dovrebbe essere simile a questo: 


Biciclette vendute: 5 | i i 
Totale vendite: L 2.500.000 | Inserire i dati su richiesta. Digitare FINE per uscire 
Avete inserito i seguenti dati di vendita: RI ga di 


Totale vendite: L 2.600.000 


Commesso Bici vendute Totale vendite 

Fabio 6 ani CNR Inserire il nome del commesso: Emanuela 

Andrea 5 DER Biciclette vendute: 7 

Sandro 12 roeoi Totale vendite: L 2.400.000 

a i 4.600.000 

manuela 7 2.400. 

Annalisa 11 È ss ; Inserire il nome del commesso: FINE 

Paola 2 1.500.000 Avete inserito i seguenti dati di vendita: 

Valerio 5 2.500 

AR Commesso Bici vendute Totale vendite 

Fabio 6 2.600.000 
Emanuela 7 2.400.000 
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. c FINEDATI. BASO si SE LL. 
i . Legge e stampa. le. infommazioni contenute. in tre matrici. i 
c_ L Il numero massimo di nomi inseribili è è 50: se ne possono interi i 
_ meno. digitando senden al posto del nome del commesso. _ 


- "OPTION BASE 1 n - imposta Ta base di tutte le matrici. a . 


. DIM Commessi $(50) | 1 dimetto la matrice di i... e 

. DIM biciVendute&(50) - dimensiona da matrice di interi. biciVendute®. 

L DIM (a, * dimensiona la matrice di punti mobili où 
LL... totvendite! ’’._. 


: i. “tnseri re i t dati su richiesta. i. Digita e FINE per uscire.* | 


. calcolot > 1 : 


inizializza u una variabile per il calcolo della la matrice 


i o. =. VETNE®) ‘continua finche nome o = "FINE 

INPUT “Inserire il nome del commesso: a . 

IF E (comme scien 2 E THEN .. 

i: —- Totale ven vendute: ,civndutet (calco) 

),—o—. " Totale vendite: a & 
2 PRINT . cc. i. 

Ccalcolok « caleotot +1 incremento 


el calcolo delle: ’ 


PRINT “Avete inserito i “seguenti. d ti di vendita:" 
SPRINT “Commesso | Bici ‘vendute dI vendite”! . . 


2 ci 
i. È RR SA 


- I inizializzazione di tmpî, ... di formattazion cv... 

i Se ne per PRINT USING | 
ue i _ uu ___ 
di ig=31 TO PERSONES; =. di ogni ini 
Cui - USING n, - $( it “ii ol 


Figura 8-9. Un programma che usa un indicatore di fine dati per determinare quan- 
do un input è terminato. 
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Creazione di matrici flessibili 


Quando si usa l’enunciato DIM bisogna informare QBasic del numero di ele- 
menti nella matrice per poter riservare uno spazio adeguato in memoria. Cosa 
succede se non si è sicuri del numero di elementi che la matrice conterrà? Per 
esempio, se il programma dipende dall’input dell’utente per quanto concerne 
i contenuti della matrice, il loro numero potrà variare moltissimo ogni volta 
che il programma viene eseguito. Come si può allora indicare a QBasic la 


quantità di memoria da riservare alla matrice? 
L’enunciato DIM permette di creare due tipi di matrici a seconda del uo 
di informazione fornita: matrici statiche e matrici dinamiche. 


Matrici statiche 
Una matrice statica presenta una dimensione definita (cioè conosciuta in anti- 
cipo). Per esempio, nel programma INFOBICI.BAS il numero dei commessi 
è conosciuto in anticipo e perciò viene collocato come costante: 
CONST PERSONE* = 7 

L’enunciato DIM usa la costante PERSONE% come numero degli ele- 
menti contenuti nella matrice: 


DIM Commessi$(PERSONE%) 


Matrici dinamiche 


Una matrice dinamica è una matrice la cui dimensione può cambiare. Una 
matrice dinamica viene dimensionata solo quando l’utente del programma de- 
finisce il numero di elementi che la matrice dovrà contenere. Per creare una 


matrice dinamica si dovrebbero seguire questi passi: 

1. Usare un enunciato INPUT per richiedere all’utente il numero di elemen- 
ti necessari. 

2. Assegnare il valore inserito dall’utente a una variabile intera. 

3. Usare la variabile intera con l’enunciato DIM per dimensionare così la 
matrice. | 


Si consiglia di usare una matrice statica quando se ne conosce la dimen- 
sione in anticipo e una matrice dinamica quando la dimensione verrà determi- 
nata ogni volta che il programma viene eseguito. 
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| ' Legge e stampa le 


Esercizio: Uso di una variabile per impostare la dimensione della matrice 
a 23 Il programma DINAMIC.BAS (figura 8-10) usa la variabile persone% per di- 
mensionare le tre matrici dinamiche delle vendite. Si noti come l’enunciato IF 
controlli il valore di persone%: se questo è inferiore 0 uguale a 10 le matrici 
non vengono dimensionate. Scrivete ed eseguite il programma DINA- 
MIC.BAS. 


Il risultato ottenuto sarà simile a questo: 


| option BASE 1 


Quanti nomi di commessi vuoi inserire? 2 | 
rsones) 
Inserire il nome del commesso: Fabio iciVendute$ (persone 
Biciclette vendute: 6 


Totale vendite: L 2.600.000 


biciVendute& 
dimensiona 1 


Inserire il nome del commesso: Emanuela 
Biciclette vendute: 7 
Totale vendite: L 2.400.000 


Avete inserito i seguenti dati di vendita: esi) 


is). 
Commesso Bici vendute Totale vendite 
Fabio 6 2.600.000 
Emanuela ; 2.400.000 


Ricerca di un elemento nella matrice 


Molto spesso è necessario effettuare delle ricerche all’interno della matrice 
per trovare un elemento specifico oppure per trovare un elemento sulla base 
di un confronto. Per eseguire entrambe queste operazioni è necessario che il 
programma esamini ogni singolo elemento della matrice e tenga traccia di 
quelli che corrispondono alla stringa di ricerca. 


Bi Nel cercare un elemento specifico QBasic confronta la stringa di ricerca 
con ogni elemento della matrice finché non trova un elemento uguale o 
finché tutti gli elementi non sono stati esaminati. 


Figura 8-10. Un programma che dimostra l’uso di tre matrici dinamiche. 
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3 Nell’effettuare una ricerca basata sul confronto si usano una o più varia- 
bili temporanee per registrare il progredire del confronto. In genere i con- 
fronti assumono le forme seguenti: 


Trova il numero più grande contenuto nella matrice. 
Trova il numero più piccolo contenuto nella matrice. 
Gli esercizi che seguono mostrano alcuni metodi tipici di ricerca di un 
elemento specifico e del numero maggiore contenuto in una matrice. 
de Esercizio: Ricerca di un elemento della matrice 


Il programma RICERCA.BAS (figura 8-11) mostra come cercare un elemen- 
to specifico all’interno di una matrice. Il programma richiede all’utente alcuni 
dati sul commesso e quali informazioni si vogliono esaminare. Un loop FOR 
esamina ciascun elemento della matrice Commessi$ fino a quando non trova 
l’elemento cercato o fino a quando l’esame non è stato completato: 


& Se laricerca va a buon fine, QBasic mostra gli elementi corrispondenti 
contenuti nelle matrici biciVendute% e totVendite! per poi uscire dal loop 
grazie a un enunciato EXIT FOR. 


@ Selaricerca non va a buon fine, QBasic mostra il messaggio Nome non 
trovato. 


Figura 8-11. Un programma che mostra come cercare un elemento specifico in una 


Scrivete ed eseguite il programma RICERCA BAS. 


matrice. 
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Il risultato sarà simile a questo: 


Inserire i dati richiesti. Digitare FINE per uscire 


Inserire i] nome del commesso: Fabio 
Biciclette vendute: 6 
Totale vendite: L 2.600.000 


Inserire il nome del commesso: Emanuela 
Biciclette vendute: 7 


Totale vendite: L 2.400.000 

Inserire il nome del commesso: Andrea 
Biciclette vendute: 5 

Totale vendite: L 3.000.000 

Inserire il nome del commesso: FINE 


Qual è il nome da cercare? Andrea 


Commesso Bici vendute Totale vendite 


Andrea 5 3.000.000 


Le Esercizio: Ricerca del numero con valore più alto contenuto in una matrice 


Il programma MAXVEND.BAS (figura 8- 12) mostra come estrarre l’elemen- 
to più grande contenuto in una matrice usando un loop di tipo FOR. Il pro- 
gramma chiede all’utente i dati sui commessi e poi esamina gli elementi della 
matrice totVendite!; il valore più alto viene conservato nella variabile Max- 
Vend! e poi confrontato con ogni elemento di toVendite! Se un altro elemen- 
to della matrice è maggiore di maxVend! questa variabile incorpora il nuovo 
elemento, scartando il precedente (la variabile /g% conserva l’indice della 
matrice associato a maxVend!). 
Dopo aver esaminato tutti gli elementi il programma mostra il valore di ven- 
dita più alto e gli elementi correlati nelle matrici Commessi$ e biciVendute% 
Scrivete ed eseguite il programma MAXVEND.BAS. | 
Il risultato che si ottiene dovrebbe essere simile a questo: 


Inserire i dati richiesti. Digitare FINE per uscire 


Inserire il nome del commesso: Fabio 
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| MAXVEND. BASCO rr. q’  _i...i_i.\|_ _ 
o Questo programma. legge 3 dati. sui “commessi. ‘in tre matrici. e mostra al | 
| * dati della persona. col pifi alto valore totale di vendita. Numero max 
(* dî nomi. inseribili @ 50; digitare "FINE" per terminare în anticipo, 
OPTION. BASE 1° imposta Ta base di tutte le matrici al ’_!_1Òò_ 
| DIM Commessi$(50) L “dimensiona. Ta matrice di stringhe Commessi 
DIM biciVendute$(50) -* dimensiona la. matrice di interi ‘hiciVendute -d 
| DIM or dimensiona. da matrice - in Virgola. mobile. 2 tottendite!. 
PRINT. “Inserire. i. dati richiesti. Digitare. FINE per, uscire" 
| PRINT . . —. 
..- inzialtza la variabile di ... di una matrice. i 
Mi (Commessi$ (calco10%) - ci “FINE” )! continua finché nome = i 
INPUT "Inserire il nome del COMMESSO: > Commessi$(calcoTo4) | _. 
IF F(Comessi$(calco10*) >. FINE") THEN _°°Ò Ii 
INPUT " Biciclette vendute: " , biciVendutas(calcoTo®) | 


INPUT I Totale. Li i. s , tottendite! (cal colot) | 

PRINT. . _ 

| calcolo* - - calcolo +1 i ‘incrementa DI calcolo della matrice 0 
1) IF eee EeEeEzzEe E: zz—........ 


END i = o. i: ..O?”. 
massino! © - totlendite! (I i 1 elemento della prima. 1 matrice | è per è ora - 
._ o il maggiore i. ql. . 
da = 1 4 la di indice delta matrice. i 
' controlla gli. altri. elementi. della matrice. alla ricerca. 
di. un valore maggiore. Se ne “trova uno. lo assegna a Massimo! e salva 
| 4 indice della matrice in om» se due valori. sono o uguali. restituisce. 
| il Sono ‘valore trovato. uu {..- 

FOR i5 = 210 calcolo& - 1° LL... 
1 (totvendite!(i%) > i. THEN -. i o\I”y_ 
- | massimo! = totVendite! (1%) | i salva n nuovo. valore maggiore. i. 


‘’inizializzazione di tmp$, m dell 
i I \ sa L$#.HH#. n 
PRINT L l.— 
PRINT 
- PRINT. 
PRINT. 
PRINT. 00 i... i 
PRINT UsINE tot; ‘ Commessi$(i%); biciVendute® (19); “totvenditel (18) 


Figura 8-12. Un programma che dimostra l'estrazione dell’ elemento con valore più 
alto in una matrice. 
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Biciclette vendute: 6 
Totale vendite: L 2.600.000 


Inserire il nome del commesso: Emanuela 
Biciclette vendute: 7 
Totale vendite: L 2.400.000 


Inserire il nome del commesso: Andrea 
Biciclette vendute: 5 
Totale vendite: L 3.000.000 


Inserire il nome del commesso: Annalisa 
Biciclette vendute: 11 
Totale vendite: L 5.200.000 


Inserire il nome del commesso: FINE 
** Annalisa ha il totale di vendita più elevato ** 


Commesso Bici vendute Totale vendite 


Annalisa Li 5.200.000 


Matrici bidimensionali 


QBasic permette di dichiarare matrici bidimensionali, cioè matrici che rap- 
presentano una tabella di valori con righe e colonne (come una scacchiera, un 
libro mastro etc.). In questa sezione vedremo come dichiarare e usare matrici 
bidimensionali all’interno di un programma. 

Partiamo con un esempio: Carlo, un distributore di bevande, vuole regi- 
strare l'andamento delle vendite delle sue quattro marche principali negli ulti- 
mi dodici mesi. Egli vuole inserire le informazioni in una tabella suddivisa 
per marche e mesi, come mostrato nella figura 8-13. 

Informazioni di carattere tabulare sono particolarmente adatte per matrici 
bidimensionali. In questo esempio, una dimensione della matrice corrisponde 
alle righe delle marche di bibite, l’altra alle colonne con i mesi. Gli elementi 
di una matrice bidimensionale vengono identificati tramite coordinate di riga 
e colonna; la figura 8-14 mostra come le coordinate di riga e colonna verreb- 
bero assegnate a ciascuna dimensione se la base della matrice fosse impostata 
a 1. Una matrice monodimensionale richiede una sola coordinata per identifi- 
care un elemento, mentre ne sono necessari due per svolgere la stessa funzio- 
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Gen Feb Mar 


Coca Spray 64 63 58 45 36 32 41 39 50 e i De 
Fizzy 35 41 60 57 38 29 25 19 26 3 sc 
Alki 15. 9 12 21 24 32 46 42 37 22 “a 
Schpritz 30 30 30 35 42 44 49 48 38 35 


Figura 8-13. Una tabella che mostra i dati di vendita negli ultimi 12 mesi. 
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ne in una matrice bidimensionale. Nella figura 8-14 per esempio, il numero 


delle casse di Coca Spray vendute in maggio sarebbe identificato dalle coor- 
dinate riga 1, colonna 5. 


COORDINATE COLONNA 


10234 5% 6 708009 10 11120 


1 Coca Spray 64 63 58 45 36 32 41 39 50 67 69 103 
2 Fizzy 35 41 60 57 38 29 25 19 26 37 43 36 
3 Alki 159 12 21 24 32 46 42 37 22 18 13 


4 Schpritz 30 30 30 35 42 44 49 48 38 35 31 30 


La COORDINATE RIGA 


Figura 8-14. Assegnazione delle coordinate a una matrice bidimensionale. 


Dichiarazione di una matrice bidimensionale 


Per dimensionare una matrice bidimensionale si usa l’enunciato DIM nel mo- 
do seguente: 


DIM nomeMatrice(righe, colonne) 


nomeMatrice è il nome della matrice, righe è il numero di riga (la prima 
dimensione) e colonne è il numero di colonna (seconda dimensione); righe e 
colonne devono essere interi e possono espressi come numeri costanti o va- 
riabili. Il carattere finale di nomeMatrice dev'essere il Garner di dichiara- 
zione del tipo che identifica il tipo di dati della matrice: $ per stringhe, % per 
interi, & per interi lunghi, / per virgola mobili a precisione singola ò # per 
virgola mobile a precisione doppia. Come in una matrice monodimensionale 
ogni elemento contenuto nella matrice dev’essere dello stesso tipo. 


NOTA: I l primo elemento di entrambe le dimensioni del- 
la matrice viene indicato con il numero 0 a meno che 


non si usi l’enunciato OPTION BASE per numerarlo di- 
versamente. 


Gli enunciati seguenti dimensi ice di 4 ri 
onano la matrice di 4 righe e 12 c 
totBibite%: si olonne 


OPTION BASE 1 
DIM totBibite%(4,12) 
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Questi altri enunciati invitano l’utente a inserire le dimensioni della ma- 
trice dinamica bidimensionale fotBibite%: 


OPTION BASE 1 
INPUT "Inserire il numero delle marche vendute: ", marche% 


INPUT "Inserire il numero dei mesi da registrare: ", mesi% 
DIM totBibite%(marche%, mesi%) 


Esercizio: Costruzione di una tabella di valori 


Il programma VENDITE.BAS (figura 8-15) mostra come viene riempita e vi- 
sualizzata sullo schermo la matrice bidimensionale totBibite%. VENDITE ri- 
ceve le coordinate di riga e colonna dall’utente, le conserva nelle variabili 
intere marche% e mesi% e le usa per dimensionare la matrice totBibite%. 
VENDITE usa due loop FOR nidificati per riempire e mostrare la matrice e 
gli enunciati DATA e READ per conservare e recuperare i mesi dell’anno. 
Questo programma può essere usato come guida per riempire e stampare 
qualsiasi matrice dinamica bidimensionale. Scrivete il programma VENDI- 


TE.BAS. 
AI momento dell’esecuzione VENDITE.BAS richiede le informazioni: 


** Programma per la registrazione delle vendite di bibite ** 


Quanti tipi di bibite vendete? 4 
Quanti mesi volete registrare (1-12)? 12 
Inserire le 4 marche di bibite che vendete 


Marca: Coca Spray 
Marca: Fizzy 
Marca: Alki 
Marca: Schpritz 


Inserire i dati di vendita delle bibite 


** Coca Spray ** 


Gen: 64 
Feb: 63 
Mar: 58 


Dopo aver inserito i dati relativi a tutte le marche e a tutti i mesi si do- 
vrebbe ottenere un risultato simile al seguente: 
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DELBASO .- . o LZ... - 
i Registra. le vendite di bibite nell’ ‘arco di un | certo periodo. __ 1 - 


PRINT. 
e 


INPUT caquanti tipi di bibite vendete? *, marche: tr... 
Loop. MHILE i < i - 

L INPUT. «Quenti i mesi i -—.- a- 12 

“Loop MILE. fe È Li oR (mesi - 3 -_ > 


OPTION. BASE i ‘imposta fl primo. -_.... Matrice i 

DIM totBibite%(marche&, mesi%) s dimensiona. la matrice. delle vendite 
E marcaNome$ (marche) 1 dimensiona. la matrice delle marche — 

|! riceve i nomi delle. marche di bibite. vendute. _ 1 

PRINT. “Inserire let; Marchetti ‘marche. di bibite che vendete! 

- PRINT — _ ii. 

tor i 2 1 To marche _____ 

- _INPUT T "Marca: *, marcalone$ (1%) 
riceve. de vendite mensiti delle bibite ._-. 


us “Inserire | i. dati di di vendita de delle bibite! 


i 1 tabella coi i dati i 


Figura 8-15. VENDITE .BAS: un programma che utilizza una matrice bidimensiona- 
le dinamica per verificare le vendite delle bibite (continua). 
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une 2? 

PFOR is = 10 di 2. . i - 

c.0-...(OY 

READ me$ . Legge i ‘nome. . mese. dalla Tista DATA ll... 
- PRINT mei ' stampa i. nomi. dei mesi. in cima alla tabella. _ {v___- 


‘ informazioni per gli enunciati READ 


PORTA Gen, Feb, Mar, Apr, Mag, Giu, Lug, Ago, Set, core, Nov, Dico . 


Figura 8-15. VENDITE.BAS: un programma che utilizza una matrice bidimensiona- 


le dinamica per verificare le vendite delle bibite. 


Vendite di bibite per 12 mesi 


Marca/Mese Gen Feb mar Apr Mag Giu Lug Ago Set Ott Nov Dic 
Coca Spray 64 63 58 45 36 32 41 39 50 67 69 103 
Fizzy 35 41 60 57 38 29 25 19 26 37 43 36 
Alki 15 9 12 21 24 32 46 42 37 22 18 13 
Schpritz 30 30 30 35 42 44 49 48 38 35 31 30 


NOTA: Per stampare una copia della tabella finale su 
carta assicuratevi che la stampante sia accesa e poi te- 
nete premuto il tasto Maiusc e il tasto Stampa Schermo, 
che serve a mandare in stampa il contenuto dello schermo. 
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Errori tipici dell’uso delle matrici 


Se da un lato le matrici sono di grandissima utilità, dall’altro possono aumen- 
tare la probabilità di commettere degli errori. In questa sezione vedremo alcu- 


ni degli errori di programmazione tipici, associati all’uso di matrici e 
all’elaborazione di grandi quantità di dati. 


Errore 1: Non usare un intero per definire una coordinata 


Il numero di elementi e dimensioni in una matrice è determinato dalle coordi- 
2 xi ° 
nate contenute nell’enunciato DIM; queste coordinate devono essere dei valo- 


ri interi o delle variabili. La seguente dichiarazione di matrice è un esempio 
valido: 


DIM voti&(studenti%, 15) 


| Le coordinate studenti% e 15 sono dei valori interi. Quest’altra dichiara- 
zione invece non è valida perché oggetti$ e quantità$ sono valori stringa: 


DIM costoTavolo!(oggetti$, quantità$) 


Quando si prova a dimensionare una matrice che contiene delle coordina- 
te non valide si ottiene il seguente messaggio di errore: 


Tipo di dati non corrispondente 


SOKE <Guida> 


| Se una coordinata è rappresentata da un numero in virgola mobile QBa- 

sic arrotonda il valore all’intero più vicino e poi dimensiona la matrice. Per 
uu i ; i 

esempio, l’enunciato seguente dimensiona una matrice con sei elementi (da 0 


as): 
DIM valori% (4,6) 


NOTA: Usare un valore a virgola mobile come coordi- 
nata di una matrice può confondere chi legge il vostro 


programma ed è perciò consigliabile mantenere sempre 
valori interi. 
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Errore 2: Usare un enunciato DIM in un loop 


Assicuratevi che gli enunciati DIM non si trovino all’interno di loop. Questa 
parte di programma mostra un uso scorretto di un enunciato DIM (in corsivo 
nel listato) nella dichiarazione di una matrice dinamica: 


OPTION BASE 1 

dimens% = 5 

CLS 

FOR i% = 1 TO dimens% 
DIM nomi$(dimens%) 
INPUT "Inserite un nome: ", nomi$(i5%) 

NEXT 1% 

PRINT 

FOR i% = 1 TO dimens% 
PRINT nomi$(i%) 

NEXT 1% 


Se provate ad eseguire questo programma avrete un messaggio di errore 
al momento in cui l’enunciato DIM viene eseguito per la seconda volta: 


Def inizione doppia 


Box <Guida> 


Per evitare questo errore bisogna dimensionare la matrice nomi$ prima 
del loop: 


OPTION BASE 1 

dimens% = 5 

DIM nomi$ (dimens%) 

CLS 

FOR i% = 1 TO dimens% 
INPUT "Inserire un nome: ", nomi$(i%) 

NEXT 1% 

PRINT 

FOR i% = 1 TO dimens% 
PRINT nomi $ (1%) 

NEXT 1% 


209 


IL LIBRO DEL QBASIC MS-DOS 


Errore 3: Confondere indice e valore della matrice 


E e confondere 11 valore usato per indicizzare un elemento della matrice 
con il valore corrispondente a quell’elemento. Ricordate che l’indice della 


matrice © sempre tra parentesi e segue il nome della matrice che descrive la 
collocazione del valore (figura 8-16). 


DIM Camera! (tipiStanze%, giorniAffitto%) 


Camera!(5, 3) = 45,85 


A 


INDICE DELLA MATRICE VALORE DELLA MATRICE) 


Figura 8-16. Indice e valore di una matrice. 


L enunciato seguente cerca di assegnare il valore stringa “Hotel Sport” al 
quinto elemento della matrice hotelLiberi$ ma non ci riesce perché l’indice e 
il valore della matrice si trovano nella collocazione sbagliata: 


hotelLiberi$("Hotel Sport") = 5 
Questa invece è l’assegnazione corretta: 


hotelLiberi$(5) = "Hotel Sport" 


Errore 4: Discordanza tra i tipi della matrice 


Ogni elemento di una matrice dev'essere dello stesso tipo; se si prova ad as- 
segnare una variabile o un valore diverso dal tipo di matrice specificato nel- 
I enunciato DIM, si ottiene un messaggio di errore. Per esempio il seguente 
enunciato di assegnazione genera un messaggio di errore perché costo ; è una 
matrice in virgola mobile a precisione singola e il valore "57.36" è un 150 di 


& 


costo! (i%) = "57.36" 


Questo tipo di errore di assegnazione produce il seguente messaggio: 
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Tipo di dati non corrispondente 


| BOKE <Guida> i 


Un analogo errore di discordanza tra tipi può ricorrere in fase di esecu- 
zione del programma se l’utente inserisce un valore diverso dall’elemento 
della matrice che lo riceve. Il loop che segue, per esempio, richiede all’utente 
di inserire una serie di interi. 


DIM valori%(5) 
FOR i% = 1 TO 5 

INPUT "Inserire un numero: ', valori&(i%) 
NEXT 1% 


Se l’utente inserisce un valore stringa ottiene il seguente messaggio: 


Inserire un numero: dieci 
Ricominciare da capo 
Inserire un numero: 


Ricominciare da capo è il messaggio con cui QBasic chiede all’utente di 
inserire il tipo di dati corretto. Per evitare questo genere di problemi in fase di 
immissione di dati è consigliabile specificare sempre, nella stringa dell’enun- 
ciato INPUT, il tipo di dati che l’utente deve inserire. 


Errore 5: Valori al di fuori dell’intervallo ammesso 


Se provate a far riferimento a un elemento che non esiste nella matrice, otter- 
rete un messaggio di errore Indice inferiore fuori limite al momento dell’ese- 
cuzione del programma. Nell’esempio che segue QBasic genera un 
messaggio di errore quando viene eseguita il terzo enunciato perché Punteg- 
gio% può contenere solo 25 elementi e si fa riferimento al trentesimo. 


OPTION BASE 1 
DIM Punteggio%(25) 
Punteggio%(30) = 92 


Questo tipo di errore è abbastanza comune in strutture di loop, come mo- 
stra questo esempio: 
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OPTION BASE 1 
DIM colori$(4) 
calcolo% = 0 
CLS 
DO 
calcolo% = calcolo& + 1 


INPUT "Inserire il nome di un colore: ", c 1 
: ", colori$(cal % 
LOOP UNTIL (colori$(calcolo4) = "FINE") $(calco10%) 


AI e dell'esecuzione del programma si ottiene un risultato simile a 
questo: 


un colore: Giallo 
Inserire un colore: Rosso 
Inserire un colore: Blu 
Inserire un colore: Verde 
Inserire un colore: Bianco 


| Dopo l’inserimento del quinto colore (che si colloca nell’ultimo elemento 
COPOIDI, nella matrice) il contatore del loop calcolo% viene aumentato e 
l enunciato INPUT (che ora si riferisce a un elemento oltre i limiti della ma- 
trice) attiva il messaggio di errore Indice inferiore fuori limite. 


Indice inferiore fuori limite 


HOKE  <Guida> 


La soluzione per questo tipo di problema è quella di determinare i limiti 
superiori € inferiori della matrice per non superarli. QBasic dispone delle fun- 
zioni UBOUND e LBOUND, le quali sono in grado di fornire i limiti di ogni 


matrice contenuta nel programma così da poter gestire questo problema po- 
tenziale. 
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Le funzioni UBOUND e LBOUND 


Le funzioni UBOUND e LBOUND restituiscono dei valori interi corrispon- 
denti ai limiti superiori e inferiori di una matrice. La sintassi di queste due 
funzioni è la seguente: 


UBOUND(nomeMatrice, dimensione) 
LBOUND(nomeMatrice, dimensione) 


nomeMatrice è il nome della matrice di cui si vogliono determinare i li- 
miti; dimensione è la dimensione che si vuole controllare (non richiesta se 
state prendendo in considerazione una matrice monodimensionale). Entrambe 
le funzioni restituiscono valori che possono essere assegnati a variabili o usati 
in espressioni. | 

Questa parte di programma usa le funzioni UBOUND e LBOUND per 
controllare la matrice monodimensionale giocatori$. 


OPTION BASE 1 
DIM giocatori$(9) | | 
PRINT "Il limite superiore è"; UBOUND(giocatori$) | 
PRINT "Il limite inferiore è"; LBOUND(giocatori$) 


Al momento dell’esecuzione si ottiene questo risultato: 


I] limite superiore è 9 
Il limite inferiore è 1 


Se si vogliono controllare i limiti di una matrice bidimensionale bisogna 
fornire un numero di dimensione: 1 per la prima e 2 per la seconda. Il pro- 
gramma che segue usa UBOUND e LBOUND per controllare i limiti di en- 
trambe le dimensioni in una matrice bidimensionale detta venditeGen%: 


OPTION BASE 1 

DIM venditeGen&(3, 4) 

PRINT "Il limite superiore della prima dimensione è"; 
UBOUND(venditeGen&, 1) 

PRINT "Il limite inferiore della prima dimensione è"; 
LBOUND(venditeGen%&, 1) 

PRINT "Il limite superiore della seconda dimensione è"; 
UBOUND(venditeGen&, 2) 

PRINT "Il limite superiore della seconda dimensione è ; 
LBOUND(venditeGen%, 2) 


Il risultato di questa porzione di programma potrebbe essere simile a 
questo: 
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I] limite superiore della prima dimensione è 3 pt BOUND. BASO LL... . .; - si 
I] limite inferiore della prima dimensione è 1 di Questo programma. carica i - in duna. matrice ino a DA -. 
I] limite superiore della seconda dimensione è 4 - at EINE b) se i miti della 1 matrice Vengono wa . | 

: Il limite superiore della seconda dimensione è 1 L. - 


ze Esercizio: Evitare il messaggio di errore “Indice inferiore fuori limite” 


BOUND.BAS (figura 8-17) mostra come usare UBOUND e LBOUND per 
controllare i limiti di una matrice in un loop DO evitando errori dovuti all’u- 
scita dall’intervallo della matrice. Il programma dimensiona una matrice 
stringa monodimensionale detta festa$ che contiene idee per giochi da fare in 
compagnia. BOUND.BAS riempie e stampa la matrice. 


NOTA: Il loop DO usa l’enunciato EXIT DO, che fa 
uscire dal loop se l’utente digita FINE prima che tutti gli 
elementi siano stati specificati. EXIT DO può essere 
usato tutte le volte che avete bisogno di uscire da un loop DO pri- 


ma che si verifichino le condizioni WHILE o UNTIL. i .- cal colok - calcolos i i ____.\ . \» ”ì! cera 
Scrivete ed eseguite il programma BOUND.BAS. [ Loop. __. 
Il risultato ottenuto al momento dell’esecuzione dovrebbe essere simile a | 


questo: ; PRINT 


Inserire idee su giochi; digitare FINE per uscire 


Gioco per feste: Alce Rossa o 1% = 

Gioco per feste: Guardia e Ladri _ Di tests 

Gioco per feste: Bandiera i _- 

Gioco per feste: Nascondino dr... {_{«_..ii. . .Zz}J/_/{Mp\____p_ . 

Gioco per feste: Quattro cantoni Figura 8-17. Un programma che usa LBOUND e UBOUND per evitare riferimenti a 
elementi della matrice esterni ai suoi limiti. 


Avete inserito i seguenti giochi: 


Alce Rossa 
Guardia e Ladri 
Bandiera 
Nascondino 
Quattro cantoni 
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7. Scrivete un programma che dichiara, riempie e stampa una matrice dina- 
mica monodimensionale contenente i personaggi dei vostri film preferiti. 


SOMMARIO 


In questo capitolo abbiamo visto alcune importanti strutture, funzioni, enun- 
ciati e tecniche che QBasic fornisce per lavorare con grandi quantità di dati: 


1 Uso di DATA, READ e RESTORE per assegnare a una variabile un’in- 
formazione immagazzinata in un programma. 


8. Checosaèl’errore Indice inferiore fuori limite’ 


Creazione e uso di una matrice monodimensionale. 
Ricerca di elementi in una matrice. 
Formattazione tabulare di informazioni con PRINT USING. 


Creazione e uso di una matrice bidimensionale. 


Risoluzione di errori tipici dovuti all’uso di matrici. 


Nel capitolo successivo vedremo le funzioni e le tecniche di QBasic cor- 
relate specificatamente all’uso di stringhe. 


DOMANDE ED ESERCIZI 


1. In un programma compare prima l’enunciato DATA o l’enunciato 
READ? 


2. Quale tipo di informazione è particolarmente adatta per l’uso di DATA, 
READ e RESTORE? 


3. Scrivete un programma che mostra i valori contenuti nella seguente 
enunciato DATA con un loop di tipo FOR: 


DATA, Gianni, Maria, Carlo, Anna, Giuseppe, Valerio, Bertilla 
4. Vero o Falso: Una matrice può conservare dati di tipi diversi. 


5. Scrivete un enunciato che riserva memoria per una matrice di 100 valori 
in virgola mobile a precisione singola. 


6. Cos'è l’indicatore di fine dati? 
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Nei capitoli 3 e 4 abbiamo visto i tipi di dati stringa e gli esercizi sulla crea- 


zione di stringhe e sulla loro visualizzazione. Questo capitolo continua quella 


discussione e introduce molte delle funzioni disponibili in QBasic per lavora- 
re con le stringhe. In particolare impareremo: 


B Comeassegnare l’input dell’utente a una stringa. 
Come combinare delle stringhe. 
Come selezionare dei caratteri da una stringa. 


Come paragonare delle stringhe. 


Come ordinare delle stringhe. 


Insieme alle tecniche che avete appreso nei capitoli precedenti, queste 
funzioni vi saranno utili per eseguire una grande varietà di compiti. 


DESCRIZIONE DELLE STRINGHE 


Una stringa è una serie di caratteri consecutivi che si usano come una unità. 
Di solito le informazioni vengono memorizzate come stringhe quando non si 
riesce a memorizzarle facilmente come dati di tipo numerico. Per esempio il 
titolo di un libro, diciamo Capitanti coraggiosi, per la sua natura testuale vie- 
ne memorizzato come stringa piuttosto che come dato di tipo numerico. 

Può essere comodo pensare che una stringa occupi una serie di posizioni 


di memoria nel computer e che queste siano come delle piccole caselle poste 


una accanto all’altra, con un carattere ciascuna al loro interno (figura 9-1). Le 
posizioni di memoria (caselle) sono fisse ma i caratteri possono spostarsi li- 
beramente da una casella all’altra ed anche aggiunti o tolti a seconda delle 
esigenze. 


Figura 9-1. Una stringa è una sequenza di caratteri. 
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In una stringa si possono usare 1 seguenti caratteri: 
Lettere maiuscole dell’alfabeto (dalla A alla Z). 
Lettere minuscole dell’alfabeto (dalla a alla z). 
Numeri (da 0 a 9). 

Simboli di punteggiatura (.,;:"2!). 

Simboli matematici (X()-+=V<>). 


Simboli eterogenei (-$A&*_ {} 


Caratteri del set di caratteri estesi IBM. 


DUE TIPI DI STRINGHE 


QBasic permette di usare due tipi di stringhe nei programmi: 


sa Le costanti stringa sono dichiarate all’interno del programma e, come 
suggerisce il nome, i caratteri in esse contenuti non cambiano mai. 


w Le variabili stringa sono anch'esse dichiarate all’interno del programma 
ma i caratteri possono cambiare in qualunque momento. 


Esaminiamo ora come e perché si usano questi tipi di stringhe in QBasic. 


Costanti stringa 


Le costanti stringa sono stringhe che non cambiano mentre si esegue il pro- 
gramma. QBasic separa le costanti stringa in due gruppi: costanti stringa let- 
terali e costanti stringa simboliche. 


Costanti stringa letterali 


Una stringa letterale è una serie di caratteri consecutivi circondati da doppie 
virgolette. Di solito si assegnano le stringhe letterali a una variabile 0 si usano 
come argomenti per un enunciato o una funzione. Per esempio, gli enunciati 
che seguono contengono delle stringhe letterali. 


evviva$ = "Forza Milan!" 


PRINT "Viale dei Tigli, 1313" 
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meta$ = StringaCentrale$ ("Oggi farò volare un aquilone") 
DatadiNascita$ = 19-11-63" 


Le stringhe letterali si chiamano anche valori stringa. 


Costanti stringa simboliche 


Una costante stringa simbolica è un nome assegnato a una stringa letterale: 


CONST DI$ = "Sua Altezza Reale, Diana, Principessa del Galles" 


& 


COSTANTE STRINGA LETTERALE 


Una volta assegnata, una costante può essere usata in tutti i posti in cui si 
dovrebbe usare una stringa letterale (allo stesso modo in cui si può chiamare 
qualcuno con un soprannome o col suo nome completo). 

Come si è detto nel capitolo 4, una costante viene assegnata in un enun- 
ciato CONST, di solito all’inizio del programma. In questo libro le costanti 
sono scritte tutte in lettere maiuscole per distinguerle dalle variabili: 


CONST DI$ = "Sua Altezza Reale, Diana, Principessa del Galles" 
PRINT "La moglie di Carlo ora si chiama"; DI$ 


Una volta dichiarata una costante, non si può cambiarne il valore. Per 


esempio, un programma che contiene i due enunciati che seguono finirebbe 
col generare il messaggio di errore Duplicate definition (definizione duplica- 
ta) al momento dell’esecuzione: 


CONST DI$ = "Sua Altezza Reale, Diana, Principessa del Galles" 
DI$ = "Lady Diana Spencer" 


La differenza tra una costante e una variabile è infatti questa: il valore di 
una variabile può cambiare durante l’esecuzione del programma, quello di 
una costante invece resta immutato. 


Esercizio: Uso delle costanti stringa 


Le costanti sono particolarmente utili quando nel programma vi sono motivi 
ricorrenti. Il programma DITO.BAS (figura 9-2) dichiara la costante DITO$ 
e vi assegna la stringa letterale Questo dito dice. 
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Scrivete ed eseguite il programma DITO.BAS. 


i DITO. BAS © ©@©@©@©5—5—_—; È —- 
i Questo. programma mostra I uso delle | cos i. 
| CONST DITO$ - "Questo dito dice' 

PRINT DITO$; "non c'è. pane" uu 

| PRINT DITO$; "come faremo" 


| PRINT DITO$; "lo. conprereno* }) 
| PRINT DITO$; "ce n'è un peettinoi «' {__- 
di DITOS: “datelo a a me che sono i più piccolino” °° 


Figura 9-2. Una semplice dimostrazione dell’ uso di costanti stringa simboliche e let- 
terali. 


Otterrete il seguente risultato: 


Questo dito dice non c'è pane 

Questo dito dice come faremo 

Questo dito dice lo compreremo 

Questo dito dice ce n'è un pezzettino 

Questo dito dice datelo a me che sono il più piccolino 


Variabili stringa 

A differenza delle costanti stringa, le variabili stringa possono cambiare in 
ogni momento durante l’esecuzione di un programma. QBasic supporta due 
tipi di variabili stringa: stringhe a lunghezza variabile e stringhe a lunghezza 
fissa. 


Stringhe a lunghezza variabile 


Le stringhe a lunghezza variabile permettono di ottenere e memorizzare delle 
informazioni fornite dall’utente di un programma. Una stringa a lunghezza 
variabile può contenere da 0 a 32767 caratteri (sebbene l’intervallo tipico sia 
da 0 a 80 a causa della larghezza dello schermo) e la sua lunghezza può au- 
mentare o diminuire durante l’esecuzione del programma. Si può dichiarare 
una stringa a lunghezza variabile in tre modi: 
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8 Mettendoilcarattere di dichiarazione del tipo stringa ($) alla fine del no- 
me della variabile. Per esempio, l’enunciato che segue richiede una strin- 
ga all’utente e la assegna alla variabile stringa Nome$. 


INPUT "Scrivi il tuo nome: ", Nome$ 


Esaminando gli esempi in questo libro, si incontreranno molti casi in cui 
gli enunciati INPUT usano stringhe a lunghezza variabile per assegnare 
nomi significativi a particolari parole o frasi; queste stringhe si usano an- 
che come argomenti per enunciati e funzioni (come PRINT). 


8 Usando l’enunciato DEFSTR. Nell’esempio seguente l’enunciato 
DEFSTR indica a QBasic di considerare come stringa a lunghezza varia- 
bile ogni variabile che cominci con la lettera S (si può usare anche una 
lettera diversa) e che non abbia un carattere di dichiarazione del tipo 
(%,8,! 0 $): 


DEFSTRS 


8 Usando AS STRING con l’enunciato DIM. L’enunciato che segue di- 
chiara che la variabile nomeCognome è una stringa a lunghezza variabile: 


Cognome AS STRING 


Si noti che nomeCognome non termina con $; infatti, quando si dichiara 
una stringa usando la parola chiave AS STRING non si può usare il ca- 
rattere di dichiarazione del tipo. 

Come si è visto nel capitolo precedente, si può anche usare l’enunciato 
DIM per dichiarare una matrice di stringhe a lunghezza variabile. Per 
esempio l’enunciato che segue dichiara una matrice di 10 stringhe a lun- 
ghezza variabile (supponendo che l’enunciato OPTION BASE 1 appaia 
per primo): 


$(10) 


Esercizio: Uso di stringhe a lunghezza variabile 


Il programma TELEF.BAS (figura 9-3) usa gli enunciati INPUT e una matri- 
ce stringa a lunghezza variabile bidimensionale chiamata contatti$ per me- 
morizzare una lista di amici e i rispettivi numeri di telefono. Poiché, in alcune 
nazioni, i numeri di telefono possono contenere dei caratteri diversi dai nu- 
meri, come linee e lettere, è meglio memorizzarli come stringhe. 

Scrivete ed eseguite il programma TELEF.BAS. 
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i TELEF. BASCO i 
- Questo. programma usa una matrice > stringa « .- “lunghezza — 

| variabile per registrare. nomi numeri di telefono. i... 
| OPTION. BASE 1 1’ Li. il ente. inferiore della matrice i 


LOPRINTO "Avete creato la seguente. 
DO PRINT, _r. - 
_FORIS=1 TO è nomi&. 
_ PRINT "Nome: "; 


Figura 9-3. Una dimostrazione di stringhe a lunghezza variabile. 


Al momento dell’esecuzione dovreste ottenere un risultato simile a que- 
sto: 


CR 


Quanti nomi desiderate scrivere? 3 


Scrivete un nome: Aldo Rossi” 
Scrivete il numero di telefono: 555-1 


Scrivete un nome: Jack Angus 
Scrivete il numero di telefono: 555-PLUM 


Scrivete un nome: Paul Thorn 
Scrivete il numero di telefono: 555-3 


Avete creato la seguente lista di contatti: 
Nome: Aldo Rossi Telefono: 555-1 


Nome: Jack Angus Telefono: 555-PLUM 
Nome: Paul Thorn Telefono: 555-3 


225 


IL LIBRO DEL QBASIC MS-DOS Capitolo 9 - Lavorare con le stringhe 


Notate che si ottiene l’allineamento della colonna dei numeri di telefono 
usando una virgola nell’enunciato PRINT per formare due colonne; in questo 
caso, il solo avanzare fino alla successiva area di stampa è sufficiente per far 
allineare le voci. Tuttavia, se i valori della stringa sono di dimensioni molto 
diverse bisogna trovare un’altra soluzione. Provate a scrivere dei nomi di di- 
verse lunghezze per capire il perché. 


DIM indirizzo AS STRING * 25 


GEPRERoeL EEE oe 


LA MEMORIA È ALLOCATA PER LA VARIABILE A LUNGHEZZA FISSA INDIRIZZO 


Stringhe a lunghezza fissa 


Le stringhe a lunghezza fissa permettono di dichiarare una variabile stringa di 
una certa lunghezza. Sebbene i contenuti di una queste stringhe possano cam- 
biare in qualsiasi momento, la lunghezza rimane costante. In generale, è me- 
glio usare le stringhe a lunghezza fissa quando si è sicuri della lunghezza di 
una stringa di caratteri o quando bisogna allineare dei gruppi di stringhe. 

Per dichiarare una stringa a lunghezza fissa si aggiunge all’enunciato 
DIM il nome della variabile stringa e la lunghezza, come si vede in questo 
esempio: 


indirizzo = "Viale delle Margherite 10" 


UN VALORE STRINGA È ASSEGNATO A INDIRIZZO 


DIM nomeStringa AS STRING * n 


nomesStringa è il nome della stringa a lunghezza fissa; n è la lunghezza 
della stringa. Per esempio, l’enunciato che segue dichiara una stringa a lun- i 
ghezza fissa (chiamata indirizzo) lunga 25 caratteri: 


DIM indirizzo AS STRING * 25 


indirizzo = "Via Donatori del sangue 42 Mestre" 


Si può anche dimensionare una matrice di stringhe a lunghezza fissa in- 
cludendo il numero degli elementi e la sua dimensione. Per esempio, l’enun- 
ciato che segue dichiara una matrice stringa a lunghezza fissa 
monodimensionale chiamata nomeCognome: 


UN VALORE STRINGA TROPPO LUNGO VIENE TRONCATO. 


Figura 9-4. Allineamento di caratteri in una stringa a lunghezza fissa. 


DIM nomeCognome(25) AS STRING * 25 


Le stringhe a lunghezza fissa sono giustificate a sinistra per definizione e nale per creare un elenco telefonico. Sono necessarie due matrici separate 
sono seguite da spazi vuoti a destra se la lunghezza del valore della stringa o perché la lunghezza della stringa in ogni matrice è diversa; se la lunghezza 
assegnato alla stringa stessa è minore della lunghezza totale della stringa (fi- i fosse la stessa si potrebbe usare una matrice stringa a lunghezza fissa bidi- 
gura 9-4). Si noti che non si può usare il carattere di dichiarazione del tipo mensionale. 
stringa ($) quando si dichiara una stringa a lunghezza fissa. Scrivete ed eseguite il programma TELEFOK.BAS. 


Esercizio: Stringhe a lunghezza fissa 


Il programma TELEFOK.BAS (figura 9-5) corregge il programma TE- 
LEF.BAS per includere due matrici stringa a lunghezza fissa monodimensio- 
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- TELEFOK. BAS _. |... vt: 
3: Questo programma. usa. de matrici stringa a lunghezza | 

- fissa per registrare nomi e numeri di. telefono. lt 
| OPTION BASE 1 _ mese. la base della matrice. a cl. - 


a 


Figura 9-5. Una dimostrazione dell’ uso di stringhe a lunghezza fissa. 


Otterrete un risultato simile a questo: 


Quanti nomi desiderate scrivere? 3 


Scrivete un nome: Aldo Rossi 
Scrivete il numero di telefono: 555-1 


Scrivete un nome: Jack Angus 
Scrivete il numero di telefono: 555-PLUM 


Scrivete un nome: Paul Thorn 
Scrivete il numero di telefono: 555-3 


Nome Telefono 


Aldo Rossi 555-1 
Jack Angus 555-PLUM 
Paul Thorn 555-3 


Notate che ora si può predire l'allineamento della colonna del numero di 
telefono. Se uno dei nomi o dei numeri di telefono fosse più lungo del nume- 
ro assegnato di caratteri, verrebbe troncato. 
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Combinazione di stringhe 


Una delle cose più semplici che si possano fare con le stringhe è quella di 
combinarle fra loro per formare stringhe più lunghe. Questo processo viene 
chiamato concatenazione; le stringhe vengono concatenate principalmente 
per preparare il testo come output per lo schermo o la stampante oppure per 
predisporre le stringhe all’archiviazione in strutture di dati o in un file. Una 
stringa concatenata di solito contiene al massimo 80 caratteri il che impedisce 
alla stringa di andare a capo. 

Si possono concatenare sia le variabili stringa che le costanti in qualsiasi 
combinazione e poi assegnarne il risultato a una variabile stringa o usarlo co- 
me argomento di un enunciato o di una funzione che richiede valori stringa 
(come PRINT). 

Per esempio, l’enunciato che segue usa l’operatore di concatenazione (+) 
per combinare le stringhe letterali Programmare, è, divertente e assegna il ri- 
sultato alla variabile di stringa frase$: 


frase$ = "Programmare" + "è" + "divertente" 


L’operatore di concatenazione combina le tre stringhe letterali per forma- 
re un’unica stringa; l'operatore di assegnazione (=) assegna poi il risultato al- 
la variabile stringa frase$. Si noti che in questo enunciato non ci sono spazi 
nelle stringhe letterali (gli spazi che circondano gli operatori non contano); 
perciò se si dovesse stampare il valore di frase$, usando l’enunciato PRINT, 
apparirebbe il seguente risultato: 


Programmareèdivertente 


L’operatore di concatenazione combina le stringhe esattamente come so- 
no, senza aggiungere spazi. Per includere gli spazi, bisogna aggiungerli alle 
stringhe letterali, inserendo uno spazio all’interno delle virgolette. Tutti i se- 
guenti enunciati mostrano anche gli spazi: 


8 PRINT "Programmare" + "è" + "divertente" 
sa PRINT "Programmare "+ "è "+ "divertente" 
PRINT "Programmare" +" "+ "è" +" "+ "divertente" 


Si può anche usare direttamente il risultato di una concatenazione come 
argomento di un enunciato, senza assegnare il risultato a una variabile inter- 
media come frase$: 
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= 


PRINT "Programmare " + "è " + "divertente" 


USO DELLE FUNZIONI STRINGA 


Finora si è visto come dichiarare le costanti e le variabili stringa, come com- 
binare le stringhe attraverso la concatenazione e come usare le stringhe come 
argomenti negli enunciati INPUT e PRINT. In questo paragrafo si parlerà 
delle funzioni di QBasic specificamente disegnate per manipolare e restituire 
valori da stringhe letterali a variabili stringa. In particolare vedremo: 


Il risultato dell’enunciato precedente è lo stesso risultato di 


= 


frase$ = "Programmare " + "è " + "divertente" 
PRINT frase$ 


Esercizio: Concatenazione di stringhe 


dea 


Il programma NOTIZIE.BAS (figura 9-6) mostra l’uso di alcune possibilità 
che vi si offrono attraverso la concatenazione di stringhe. 
Scrivete ed eseguite il programma NOTIZIE.BAS. 


ss Comecambiare maiuscole o minuscole in una stringa. 
sm Comedeterminarelalunghezza di una stringa. 


si Comeseparare delle stringhe. 


Cambiare maiuscole e minuscole in una stringa 


È facile cambiare le lettere di una stringa da maiuscole in minuscole o vice- 
versa: basta usare le funzioni UCASE$ o LCASE$. Queste funzioni sono utili 
se si vuole che tutti i dati nel programma siano uniformi e non si sa con cer- 
tezza se l’utente scriverà il testo in maiuscolo o minuscolo. Si capirà meglio 
l’importanza di queste informazioni quando, alla fine di questo capitolo, si 
vedrà come si confrontano le stringhe. 


Uso della funzione UCASE$ 


Per rendere maiuscole tutte le lettere di una stringa si usa la funzione UCA- 
SES: 


UCASE$ (espressionestringa) 


espressionestringa può essere un qualsiasi tipo di stringa. Il valore resti- 
tuito da UCASE$ può essere assegnato a una variabile stringa o usato come 
argomento per un enunciato o funzione che accetta valori stringa. UCASES$ 
ha effetto solo sulle lettere minuscole di espressionestringa. 


Figura 9-6. Un programma che mostra l’uso della concatenazione di stringhe. 


Ce Esercizio: Uso della funzione UCASE$ 
Se quando vi si chiede il nome della città rispondete Londra, avrete il se- 
guente risultato: 


Il programma MAIUSC.BAS (figura 9-7) mostra come lavora la funzione 
UCASE$. MAIUSC.BAS dichiara una costante stringa e due variabili stringa 
e poi usa la funzione UCASES$ per visualizzarle in maiuscolo. Si noti che la 
funzione UCASE$ ha effetto solo sul risultato dell’enunciato PRINT e dun- 
que non cambia i contenuti della costante SCRITTORE$ o della variabile in- 
dirizzo$ (ciò è bene, perché, come si è già visto, assegnare un nuovo valore a 


Scrivete il nome di una città: Londra 
Notizia-lampo: Il ponte di Londra sta cadendo! 
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una costante sarebbe un errore). Quando le stringhe vengono nuovamente vi- 
sualizzate alla fine del programma, solo la variabile area$ mantiene le lettere 
maiuscole, perché così le erano state assegnate in origine. 

Scrivete ed eseguite il programma MAIUSC.BAS. 


i MAIUSC. BASCO ÀÀÀ . 

i Questo. programma mil della uu UCASES. 
| CONST SCRITTORE$ = "Sir Arthur Conan Doyle" _ 
| Îndirizzo$ = ‘01326 Serpentine ‘Avenue! 

i CUCASES —. John! _ © 


| pRINTÙ dt - 6 

— PRINT UCASE$ Sa + ““+areî 
PRO ___- __ 

— PRINT SCRITTORE$ yÒ 

e indirizzo$ + + e + + areas LL... .à..  »—» ©È©—»© 


Figura 9-7. Una dimostrazione della funzione UCASES. 
Avrete un risultato simile a questo: 


SIR ARTHUR CONAN DOYLE 
1326 SERPENTINE AVENUE, ST. JOHN'S WOOD 


Sir Arthur Conan Doyle 
1326 Serpentine Avenue, ST. JOHN'S WOOD 


Uso della funzione LCASE$ 


Per rendere minuscole tutte le lettere di una stringa, si usa la funzione LCA- 
SES: 


LCASE$ (espressionestringa) 


espressionestringa può essere un qualsiasi tipo di stringa. Il valore resti- 
tuito da LCASE$ può essere assegnato a una variabile stringa o usato come 
argomento per un enunciato o funzione che accetta valori stringa. LCASE$ 
ha effetto solo sulle lettere maiuscole di espressionestringa. 


232 


Capitolo 9 - Lavorare con le stringhe 


Esercizio: Uso della funzione LCASE$ 


Il programma MINUSC.BAS (figura 9-8) mostra come lavora la funzione 

LCASF$. MINUSC.BAS converte le lettere di una stringa da maiuscole a mi- 

nuscole e assegna la stringa risultante a una variabile e all’enunciato PRINT. 
Scrivete ed eseguite il programma MINUSC.BAS. 


x MINUSC. BASCO 


_ 0. programa. mostra v "uso. o delle funzioni I UCASEE e LOSS. 


-.- onertock Holmes" 
Li. i i'. 


_._.. PUCASES persone) 
I PRINT pa _.- i 


..«- Lonses Cersonasgios) 
PRINT personaggio$ -- 


Figura 9-8. Un programma che dimostra l’uso della ES LCASES$. 


Avrete il seguente risultato: 


Sherlock Holmes 
SHERLOCK HOLMES 
sherlock holmes 


Come determinare la lunghezza di una stringa 


Vi capiterà spesso di voler sapere quanti caratteri vi sono in una stringa; sa- 
perlo può essere utile soprattutto per le stringhe a IUnEuezaa variabile, spe- 
cialmente per quelle immesse dalla tastiera. 

Per determinare quanti caratteri (inclusi gli spazi) vi siano in una stringa 
si usa la funzione LEN (length): 


LEN (espressionestringa) 
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espressionestringa può essere, ancora una volta, un qualsiasi tipo di strin- 
ga. Il valore restituito da LEN può essere assegnato a una variabile intera o 
usato come argomento per un enunciato o funzione che accetta valori interi. 
La seguente routine mostra come la funzione LEN determini il numero di 
caratteri in una stringa e assegni tale numero a una variabile intera: 


nomeCognome$ = "Nonna Papera" 
lunghezzaNome% = LEN (nomeCognome$) 


PRINT nomeCognome$; " è lungo"; lunghezzaNome%; 


Quando si esegue questa routine, si ha il seguente risultato: 


Nonna Papera è lungo 12 caratteri 


Esercizio: Uso della funzione LEN 


Il programma MENU.BAS (figura 9-9) mostra come il valore restituito dalla 
funzione LEN può essere usato come argomento per un enunciato PRINT. Il 
programma MENU.BAS dichiara tre stringhe a lunghezza variabile che con- 
tengono potenziali scelte di portate per l’utente; queste stringhe vengono vi- 


sualizzate con gli enunciati PRINT. 


Un enunciato INPUT richiede all’utente di scegliere una portata; questa sele- 
zione viene poi assegnata alla variabile scelta$ e viene convertita in maiusco- 
le con la funzione UCASE$. L’enunciato SELECT CASE paragona la 
variabile scelta$ alle tre variabili di portata; se c’è una corrispondenza, la 
scelta della portata e la sua lunghezza (restituita dalla funzione LEN) vengo- 
no stampate, altrimenti l’enunciato CASE ELSE stampa il messaggio Non ri- 


conosco questa scelta! 
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"caratteri" 


Figura 9-9. Un programma che mostra l’uso della funzione LEN. 


Otterrete un risultato simile a questo: 
Che cosa desideri? 
Cappuccino e cornetto 
Pasta del giorno 
Frittata di spinaci 


Scelta: Cappuccino e cornetto 


Cappuccino e cornetto è lungo 21 caratteri 
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Come separare delle stringhe 


Abbiamo visto come QBasic permetta di combinare delle stringhe attraverso 
la concatenazione. Talvolta, però, può essere necessario separare delle strin- 
ghe, per ottenere, per esempio, solo il cognome di una persona dal nome e co- 
gnome. QBasic contiene sei funzioni che permettono di lavorare con parti di 
stringhe. I paragrafi che seguono descrivono come usare queste funzioni con i 
seguenti obiettivi: 


Ottenere l’estremità destra di una stringa (RIGHT$). 
Ottenere l’estremità sinistra di una stringa (LEFT$). 
Ottenere il centro di una stringa (MID$). 

Tagliare l’estremità destra di una stringa (RTRIM$). 


Tagliare l'estremità sinistra di una stringa (LTRIM$). 


Trovare una stringa all’interno di un’altra (INSTR). 
Si parlerà anche di enunciati che permettono di 

Bi Ottenere unariga intera di input (LINE INPUT$). 
B Stampare caratteri ripetuti (SPACE$, STRING$). 


Come ottenere le estremità di una stringa 


Le funzioni RIGHT$ e LEFT$ consentono di recuperare uno o più caratteri 
cominciando da una delle due estremità di una stringa; ciò è utile quando si 
vuole visualizzare o rimuovere parte di una stringa. 

La sintassi della funzione RIGHT$ è la seguente: 


RIGHT$ (espressionestringa, n) 
La sintassi della funzione LEFT$ è la seguente: 
LEFT$ (espressionestringa, n) 


espressionestringa può essere un qualsiasi tipo di stringa e n è un valore 
intero (che va da 0 alla lunghezza della stringa) che indica il numero di carat- 
teri che devono essere restituiti da RIGHT$ o LEFT$. Il valore restituito può 
essere assegnato a una variabile stringa o usato come argomento per un enun- 
ciato o una funzione che accetta valori stringa. 
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Esercizio: Uso della funzione RIGHT$ 


Il programma GETRIGHT.BAS (figura 9-10) usa la funzione RIGHT$ per 
recuperare dei caratteri da una variabile chiamata alfabeto$, che contiene le 
21 lettere dell’alfabeto. GETRIGHT.BAS estrae il numero di caratteri richie- 
sto e li visualizza. 

Scrivete ed eseguite il programma GETRIGHT.BAS. 


. GETRIGHT. BASCO u|_vv0‘Ò00u ' @ò@è@w& 
_ i ‘programma mostra l'uso della funzione RIGHTS. __ 


‘alfabeto = "ADCDEFGILIMOPORSTUVZ! dichiara la an 
uu e. »Ò L“ testo. _@ÒÒ@ 


PRINT “Quanti caratteri a - a .... retta 

- PRINT seguente stringa c desideri Visualizzare? n 

PRINT. . q@AO 
PRINT alfabeto$ ‘visualizza la stringa di testo: 006 
i - —____))]À_ à ’ÉìÒ’’ ’ °“ L0ÒÒÒ 

- * riceve dall ‘utente. 11 numero d di caratteri. di destra. 

__. visualizzare. }y° _’ 

| DO Fa un loop fino a che i numero è è nell'intervallo — 

| Igiusto. (da 1azi). _\\{II\ Ò» 
___INUI® - Numero. (1- 20): cc umbestra 

| Loop MHILE. (nunDestra% < È oR (destra > > 21) _ °° 


PRINT _ù. 
cardestras - RIGHTS (alFabetoî, rundestra®) visualizza 


; PRINT nai specificato” 1 (cardestra$); ; "caratteri: s- 
o carbestra$ L_ I _ |. _-: 


Figura 9-10. Un programma che mostra l’uso della funzione RIGHTS. 
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Otterrete un risultato simile a questo: 


Quanti caratteri (da destra a sinistra) nella 
seguente stringa desideri visualizzare? 


ABCDEFGHILMNOPQRSTUVZ 
Numero (1-21): 14 


Hai specificato 14 caratteri: HILMNOPQRSTUVZ 


Esercizio: Uso della funzione LEFT$ 


Il programma GETLEFT.BAS (figura 9-11) corregge il programma GE- 
TRIGHT.BAS per estrarre dei caratteri dall’estremità sinistra di una stringa 
con la funzione LEFT$. 

Si noti che i nomi delle variabili sono cambiati di poco (numDestra% di- 
venta numSinistra%, e carDestra$ diventa carSinistra$) e che la funzione 
RIGHT$ è stata cambiata in LEFT$. A parte questi cambiamenti (e altri ri- 
guardanti il prompt e i commenti al programma), GETLEFT.BAS è identico 
a GETRIGHT.BAS. 

Poiché le operazioni delle funzioni RIGHT$ e LEFT$ sono tanto simili, è 


facile cambiare il programma per modificare una stringa dall’estremità oppo- 
sta. 


Modificate il programma GETRIGHT.BAS perché vada bene per GE-- 


TLEFT.BAS ed eseguitelo. 
Otterrete un risultato simile al se guente: 


Quanti caratteri (da sinistra a destra) nella 
seguente stringa desideri visualizzare? 


ABCDEFGHI LMNOPQRSTUVZ 
Numero (1-21): 12 
Hai specificato 12 caratteri: ABCDEFGHILMN 
Come ottenere il centro di una stringa 
La funzione MID$ consente di recuperare uno o più caratteri da qualunque 


parte all’interno di una stringa: da sinistra, dal centro, o (con l’ausilio della 
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PRINT "seguente stringa desi 
bu»; _____..ì 
| PRINT alfabeto$ ' Visualizza stri 
il lu...’ 


LEI 


Figura 9-11. Un programma che mostra l’uso della funzione LEFT$. 


funzione LEN) da destra. Proprio questa versatilità fa sì che la funzione 
MID$ sia una delle più utili funzioni stringa e , come si vedrà più avanti, per- 
mette di risolvere molti problemi propri dell’uso di stringhe. 

La sintassi per la finzione MID$ è la seguente: 


MID$ (espressionestringa, inizio, lunghezza) 


espressionestringa può essere un qualsiasi tipo di stringa, inizio è un Va- 
lore intero tra 1 e la lunghezza di una stringa (che indica il primo carattere 
che deve essere restituito) e lunghezza è un valore intero che indica il numero 
di caratteri che devono essere restituiti. Il valore restituito da MID$ può esse- 
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re assegnato a una variabile stringa o usato come argomento per un enunciato 
) funzione che accetta valori stringa. La figura 9-12 mostra gli elementi della 
sintassi della funzione MID$. 

Gli enunciati che seguono mostrano alcuni usi della funzione MID$. Si 
notino le grandi possibilità che emergono quando si usa il valore restituito da 


una funzione come argomento per MID$ o quando si assegna il valore resti- 
tuito da MID$ a un’altra enunciato o funzione. 


FUNZIONE MID$ POSIZIONE PRIMO CARATTERE RESTITUITO 


7 gp 


MID$ (espressionestringa, inizio, lunghezza) 


2 


STRINGA DA CERCARE NUMERO CARATTERI DA RESTITUITI 


Figura 9-12. Gli elementi della funzione MID$. 


secondoNome$ = MID$ ("Regina Victoria Belfield", 7, 8) 


Risultato: secondoNome$ contiene Victoria 


indirizzo$ = "1521 Plumtree Lane 25-K" 

inizioNomeStrada% = 6 

lunghezza% = 13 

PRINT UCASE$ (MID$(indirizzo$, inizioNomeStrada&, lunghezza&)) 


Risultato: PLUMTREE LANE 
inString$ = "Oggi è una bella giornata" 
parolaPiAùDestra = MID$ (inString$, LEN(inString$) - 4, 5) 


Risultato: parolaPiù A Destra$ contiene giornata 


PRINT “L'anno corrente è"; MID$ (DATE$, 7, 4) 


Risultato: l’anno corrente è 1991 
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Esercizio: Uso della funzione MID$ 


Il programma GETMID.BAS (figura 9-13) mostra come recuperare dei carat- 
teri dal mezzo di una stringa con la funzione MIDÎ$. 

GETMID modifica i programmi GETRIGHT e GETLEFT per includere 
un punto di partenza insieme al numero di caratteri che devono essere visua- 
lizzati nella stringa alfabeto$. GETMID usa due loop di tipo DO per ottenere 
valori interi nell’intervallo ammesso e poi usa la funzione MID$ per assegna- 
re i caratteri selezionati alla variabile carMezzo$. 

I risultati della selezione vengono stampati con la successiva enunciato 
IF, che appare quasi alla fine del programma: 


IF (numDaVisualizzare& = LEN (carMezzo$)) THEN 

PRINT numDaVisualizzare%; "caratteri visualizzati: "; carMezzo$ 
ELSE 

PRINT numDaVisualizzare%; "caratteri richiesti, "; 

PRINT LEN (carMezzo$); "visualizzati: "; carMezzo$ 
END IF 


L’enunciato IF confronta numDaVisualizzare% (la variabile che contiene 
il numero di caratteri che l’utente ha richiesto fossero visualizzati) e il nume- 
ro di caratteri in carMezzo$ (restituita dalla funzione LEN). Se i due valori 
sono uguali, il valore di numDaVisualizzare% viene stampato insieme al con- 
tenuto di carMezzo$. Se i due valori non sono uguali, viene usata la funzione 
LEN per determinare il numero reale di caratteri, e questo valore viene visua- 
lizzato insieme alla stringa carMezzo$. GETMID contiene questo messaggio 
aggiuntivo per far sapere all’utente che la lunghezza di visualizzazione digita- 
ta eccede il numero di caratteri rimanenti nella stringa. 

Modificate il programma GETLEFT.BAS perché vada bene con il pro- 
gramma GETMID.BAS ed eseguitelo. 

Al momento dell’esecuzione dovreste ottenere un risultato simile a quello 
riportato a pagina 243. 
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| ' Questo programma mostra l'uso della funzione MID$./////// 


Quanti caratteri (da sinistra verso destra) nella 
seguente stringa desideri visualizzare? 


ABCDEFGHILMNOPQRSTUVZ 


Numero (1-21): 14 
Con quale carattere desideri cominciare? 


Numero di inizio (1-21): 4 


14 caratteri visualizzati: DEFGHILMNOPORS 


Se specificate un numero fuori dall’intervallo ammesso da GETMID, ot- 
terrete un risultato come questo: 


Quanti caratteri (da sinistra verso destra) nella seguente stringa 
desideri visualizzare? 


ABCDEFGHI LMNOPQRSTUVZ 


Numero (1-21): 0 
Numero (1-21): 30 
Numero (1-21): 15 
Con quale carattere desideri cominciare? 


| Numero iniziale (1-21): v 
ati 
_ Ricomincia da capo 

Numero di inizio (1-21): 18 


15 caratteri richiesti, 3 visualizzati: UVZ 


Se scrivete un valore non numerico (come una lettera) in risposta a uno 
1... . — 2“... ___u_A . dei prompt, QBasic stampa il messaggio Ricominciare da capo e visualizza di 
Figura 9-13. Un programma che mostra l’uso della funzione MID$. nuovo il prompt. Trattare con questo tipo di risposta da parte dell’utente è im- 
portante per sviluppare programmi “a prova di errore”. 


Come tagliare una stringa 


Quando si vogliono allineare stringhe o eliminare spazi vuoti alle loro estre- 
mità, si possono usare le funzioni di taglio di QBasic, LTRIM$ e RTRIMS. 
La funzione LTRIM$ permette di tagliare l’estremità sinistra di una stringa 
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in se stesse non vengono modificate (non si può infatti cambiare la lunghezza 


di una stringa a lunghezza fissa). 
Notate anche come un argomento stringa viene trasferito da RTRIM$ a 


LTRIM$ a PRINT in questo enunciato tratto da SALUTI: 
PRINT "Penso che"; LTRIM$ (RTRIM$(nome)); 


La funzione RTRIM$ elabora la variabile nome e passa il valore stringa 
risultante all’enunciato PRINT; questo lo combina con due altri valori stringa 
e li visualizza insieme sullo schermo. 

Scrivete ed eseguite il programma SALUTI BAS. 


restituendola senza spazi davanti o tabulazioni. La funzione RTRIM$ svolge 
una funzione simile, all’estremità destra. 
La sintassi per la funzione LTRIM$ è la seguente: 


LTRIM$ (espressionestringa) 


La sintassi per la funzione RTRIMS$ è la seguente: o 


RTRIM$ (espressionestringa) 


espressionestringa può essere un qualsiasi tipo di stringa. Il valore resti- 
tuito da LTRIM$ e RTRIM$ può essere assegnato a una variabile stringa 0 

usato come argomento per un enunciato o funzione che accetta valori stringa. 
La routine che segue usa la funzione LTRIM$ per rimuovere i tre spazi 


che precedono la variabile stringa frase/nglese$ prima di stamparla: n . SA LUTT. AS 


“= sto. program mostra a l'uso delle funzioni i TRIS e - RTRIMS. 


fraseInglese$ = Good evening" 


fraseInglese$ = LTRIMI (fraseInglese$) | DIMn ‘nome AS STRING. +12 î hi ara. le stringhe. a 3 Tunghezza fissa. _ 


| DIM cognome AS STRING * 15 


PRINT fraseInglese$; "I" 
Questa routine ha come risultato: i 
- Riceve nome e cognome __ 
Good evening! _ .. 


La routine che segue usa la funzione RTRIM$ per rimuovere i tre spazi o 
finali dalla variabile stringa fraseTedesca$ prima di stamparla: ! 


fraseTedesca$ = "Guten Abend —" 
fraseTedesca$ = RTRIM$ (fraseTedesca$) 


PRINT fraseTedesca$; "1" 


Questa routine ha come risultato: Figura 9-14. Un programma che mostra l’uso delle funzioni LTRIM$ e RTRIM$. 
Guten Abend! 
Esercizio: Uso di LTRIM$ e RTRIM$ 


Otterrete un risultato simile a questo: 


Il programma SALUTI.BAS (figura 9-14) mostra come usare insieme le fun- .. i È » ea Rossi 
zioni LTRIM$ e RTRIM$ per tagliare degli spazi vuoti da entrambe le estre- O | 
mità di una stringa a lunghezza fissa. SALUTI dichiara due variabili stringa a 
lunghezza fissa chiamate nome e cognome e usa gli enunciati INPUT per ot- 
tenere valori stringa per queste variabili; il programma poi visualizza due 
messaggi per l’utente: il primo messaggio non è tagliato, il secondo è tagliato 
dalle funzioni LTRIM$ e RTRIM$. Notate che le stringhe a lunghezza fissa 


Piacere, Gino Rossi ! 
Credo che Gino Rossi sia un bel nome. 
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Come ottenere dall’utente un’intera riga di input 


In questo capitolo è stata usato l’enunciato INPUT per ottenere informazioni 
dall'utente. Questa enunciato è molto versatile perché può assegnare l’input a 
una 0 più variabili di diverso tipo e fornire un altro prompt per controllare 
esattamente ciò che l’utente dovrebbe specificare. Una cosa che non abbiamo 
ancora discusso è come l’enunciato INPUT tratti una virgola nella riga di in- 
put. Si consideri il seguente enunciato, che chiede all’utente di scrivere nome 
e indirizzo: 


INPUT "Scrivi nome e indirizzo: ", indirizzoPostale$ 


Se i utente risponde al prompt con una stringa contenente delle virgole, 
appare il messaggio di errore Ricomniciare da capo, come in questo caso: 


Scrivi nome e cognome: Mario Bianchi, via Roma 40, 35121 Padova 
Ricominciare da capo 
Scrivi nome e indirizzo: 


Come s1 è visto nel capitolo 4, l’enunciato INPUT fa un uso particolare 
della virgola nella riga di input: essa serve a separare i valori assegnati alle 
variabili. Ma cosa succede quando appaiono nell’input delle virgole inaspet- 
tate, come nell’esempio sopra? In questo caso si potrebbe risolvere il proble- 
ma assegnando parti della stringa di informazioni a variabili distinte. Per 
esempio, il seguente enunciato INPUT assegna il valore stringa digitato dal- 
l’utente a cinque variabili: 


a "Scrivi nome e cognome: ", nome$, indirizzo$, città$, stato$ 
“i 9 9 


| Ma ci sono casi in cui sarebbe più semplice avere un solo nome di varia- 
bile associato a una riga di input. Si può risolvere questo problema con l’e- 
nunciato LINE INPUT. L’enunciato LINE INPUT riceve dalla tastiera 
un'intera riga di testo e la assegna a una variabile stringa, anche se ci sono 
delle virgole. 


La sintassi per l’enunciato LINE INPUT è la seguente: 
LINE INPUT [:] ["stringaprompt";] variabi lestringa 


stringaprompt è una stringa letterale che richiede all’utente un input, e 
variabilestringa può essere una qualsiasi variabile stringa. 


s Mettendo un punto e virgola immediatamente dopo LINE INPUT il cur- 
sore rimane sulla stessa riga dopo che l’utente ha premuto Invio. 
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m Se stringapromptè inclusa nell’enunciato, si deve inserire un punto e Vir- 


gola per separare stringaprompt da variabilestringa. 


s A differenzadell’enunciato INPUT, l’enunciato LINE INPUT non stam- 


pa punti interrogativi a meno che il punto interrogativo non sia incluso in 
stringaprompi. 
La seguente routine dimostra l’utilità di LINE INPUT per lunghe righe di 


informazioni contenenti virgole: 


LINE INPUT "Scrivi nome e cognome: "; indirizzoPostale$ 
PRINT indirizzoPostale$ 

Quando si esegue questa routine e si scrivono le informazioni che si cer- 
cava di scrivere prima, si otterrà il seguente risultato: 


Scrivi nome e cognome: Mario Bianchi, via Roma 40, 35121 Padova 
Mario Bianchi, via Roma 40, 35121 Padova 


Troveremo ancora l’enunciato LINE INPUT negli ultimi capitoli. 


Come stampare caratteri ripetuti 


In QBasic vi sono due utili funzioni che generano stringhe di caratteri ripetu- 
ti: la funzione SPACE$, che restituisce una stringa di spazi, e la funzione 
STRING$, che restituisce una stringa di caratteri. Entrambe le funzioni aiuta- 
no a costruire velocemente stringhe da usare nella formattazione e nell’alli- 


neamento del risultato del programma. 
La sintassi della funzione SPACES è la seguente: 


SPACES (n) 


n è un valore intero che specifica il numero di spazi che conterrà la strin- 
ga. Il valore restituito da SPACES può essere assegnato a una variabile strin- 
ga o usato come argomento di un enunciato 0 funzione che accetta valori 


stringa. 
L’uso più comune della funzione SPACES è quello della formattazione 
del risultato, come si può vedere nella routine che segue: 


vuoto$ = SPACE$ (15) 
PRINT vuoto$; "Grande svendita oggi!" 


Si può usare SPACES ogni volta che si rientra costantemente il testo con 
un numero definito di spazi. 
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La sintassi della funzione STRING$ è la seguente: 


STRING$ (m, espressionestringa) 


m è un valore intero che specifica la lunghezza della stringa che deve es- 
sere restituita; espresslonestringa è il carattere che dev'essere ripetuto. Il va- 
lore restituito da STRING$ può essere assegnato a una variabile stringa o 
usato come argomento per un enunciato o funzione che accetta valori stringa. 


& Esercizio: Uso di SPACE$ e STRING$ 


La funzione STRING$ è usata soprattutto per i titoli nel risultato del pro- 
gramma. Il programma INTEST.BAS (figura 9-15) usa STRING$ per visua- 
lizzare un messaggio di intestazione nel mezzo dello schermo. Si noti che 
usare una costante per specificare il numero di caratteri ripetuti semplifica la 


modifica del programma e che le variabili create da SPACE$ e STRING$ so- 
no molto adatte per la concatenazione. 


Scrivete ed eseguite il programma INTEST.BAS. 


n INTEST. BASCO AA AAIAA\AA@Q{Qa{aiiiiiiiii 
_- Questo pregrama mostra 1 uso o delle funzioni. SPACES e e STRINGS. 


Figura 9 9-15. Un programma che mostra l’uso delle funzioni SPACES e STRINGS. 


Il nome del file FAGIOLO.DOC apparirà nel mezzo della riga superiore 
dello schermo, circondato da un numero uguale di asterischi e spazi vuoti. 
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Come trovare una stringa all’interno di un’altra stringa 


Le funzioni RIGHT$, LEFT$ e MID$ sono state usate per restituire caratteri 
dalle parti destre, sinistre e centrali di una stringa. Queste funzioni sono effi- 
caci quando si devono estrarre dei caratteri da una specifica posizione nella 
stringa, ma sono meno efficaci quando devono ricercare ed estrarre un speci- 
fico campione. La funzione INSTR cerca una stringa all’interno di un’altra e 
insieme a RIGHT$, LEFT$ e MID$ e alle funzioni di supporto di cui si è par- 
lato in questa sezione (UCASE$, LCASE$, LEN$, RTRIM$,LTRIM$, SPA- 
CE$ e STRING$) completa il quadro degli strumenti utili per lavorare con le 
stringhe. 
La sintassi della funzione INSTR è la seguente: 


INSTR ([inizio, ] stringabase, cercastringa) 


inizio è un valore intero facoltativo che specifica il carattere dal quale co- 
minciare la ricerca, stringabase è la stringa all’interno della quale viene fatta 
la ricerca e cercastringa è la stringa cercata. Il valore restituito da INSTR può 
essere assegnato a una variabile intera o usato come argomento per un enun- 
ciato o funzione che accetta valori interi. La tavola che segue dà una lista dei 
valori che la funzione INSTR può restituire: 


Condizione Valore intero restituito 


|  ——@1pqIRLR:R:°V"Mì€®&yw OR EEEÙTTfITTTIITIEITMlIEmI 


cercastringa trovata in stringabase Posizione in stringabase in cui è stato 
trovato l’abbinamento 

cercastringa non trovata in stringabase 0 

inizio è più grande della lunghezza 


di stringabase 0 
stringabase non contiene caratteri 0 
cercastringa non contiene caratieri inizio (se esiste); altrimenti 1 


Esercizio: Uso della funzione INSTR 


Il programma GATTA.BAS (figura 9-16) usa la funzione INSTR per cercare 
la stringa atta nella stringa C'era una gatta matta matta. 
Scrivete ed eseguite il programma GATTA.BAS. 
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ne della stringa cercata è assegnata alla variabile carCorrente%. La variabile 
num% viene incrementata e la variabile carCorrente% viene spostata subito 
dopo la stringa corrispondente nella stringa base (nuovo punto di partenza per 
la ricerca); questo processo continua fino a quando si raggiunge la fine della 
stringa base o la stringa cercata non viene più trovata. La funzione Ripeti% 
restituisce allora il risultato della ricerca alla variabile rigaRipeti% nel pro- 
gramma principale. Scrivete ed eseguite il programma RIPETI.BAS. Notate 
che la figura 9-17 mostra come appare RIPETI.BAS quando viene stampato, 
non come appare all’interno di QBasic. Assicuratevi di usare il comando 
Nuovo SUB nel menu Modifica per inserire il sottoprogramma RiceviTesto e 
il comando Nuova FUNCTION nel menu Modifica per inserire la funzione 
Ripeti%. Potete rivedere questo procedimento nel capitolo 7. 


| ' Questo programma mostra l'uso della funzione INSTRO-/)° 


Figura 9-16. Un programma che mostra l’uso della funzione INSTR. 


L’output del programma sarà: 
atta appare per la prima volta a cominciare dal carattere 11 


Sebbene il campione atta appaia tre volte in base$, la funzione INSTR 
restituisce soltanto la posizione della prima volta in cui si presenta. Si può | 
tuttavia usare INSTR all’interno di un loop per trovare tutte le ripetizioni di 
tale campione. | 

E bene controllare il valore restituito da INSTR quando si usa tale fun- 
zione. Ciò consentirà infatti di decidere cosa fare se la stringa cercata non è 
stata trovata o se la stringa cercata o la stringa base sono vuote. 

| Per esempio, nel programma GATTA, se non si fosse trovata atta. la fun- 
zione INSTR avrebbe assegnato il valore 0 alla variabile posizStringa% e l’e- 
a IF avrebbe visualizzato il messaggio per indicare che afta non c’era 
in based: 


atta non trovata 


Esercizio: Trovare tutte le ripetizioni di un campione 


Il programma RIPETI.BAS (figura 9-17) usa la funzione INSTR per trovare 

tutte le ripetizioni di un campione in una serie di righe digitate sulla tastiera. 
La funzione Ripeti% rappresenta il centro di RIPETI: tutte le volte che 

INSTR trova la stringa cercata (cerca$) nella stringa base (base$), la posizio- 


Figura 9-17. Un programma che scorre le righe in cerca di un campione e stampa il 
numero degli abbinamenti trovati (continua). 
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PRINT “Scrivi fio Cc MAXLINESS; "righe. di testo; | per. _ 


i Riceve dall’ ‘utente n) campione da cercare. PRINT. "finire, ; premi. Invio in una riga. nuova. 


- —_..-- “_i cc’ 
i "Scrivi la a stringa è da cercare: ", campione$ | 


ia di fia Ripetit | per detentinare i numere 
. di ‘abbinamenti. per riga; dla variabile. id 
_- tiene nota del numero. di abbinamenti totali. .. 


RR i | To n — ___ ll -.ù},, 
. | ripetiRiga& =. Ripeti (campione$, righelnpitt 0) 
. L_ TipetiTotates = Dea: + hi. _ 


| visualizza le righe inserite dall ‘utente. __1 


PRINT thai. ‘inserito le seguenti righe: ’.. 
POPRINTO _ 

- 14 = . To numbiRiohes __ 

o PRINT en n I. 

NET i ___ ____ 


| PRINT Du campione. . canpioneS; "appar ; ripetiTotale&; 


Fi 9-17.U h le righe i di i t 1 Figura 9-17. Un programma che scorre le righe in cerca di un campione e stampa il 
ra 9-17. Un programma c rre le r rca n campione e stampa i | . o 
RESI da; so na: CA TAN di | numero degli abbinamenti trovati (continua). 
numero degli abbinamenti trovati (continua). | 
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Figura 9-17. Un programma che scorre le righe in cerca di un campione e stampa il 
numero degli abbinamenti trovati. 


Al momento dell’esecuzione otterrete un risultato simile a questo: 


Scrivi fino a 10 righe di testo; per finire, premi Invio in una 
riga nuova. 


-> Dieci bravi regnanti 

-> Nove dame danzanti 

-> Otto fanciulle vocianti 

-> Sette cigni svolazzanti 

-> Sei oche starnazzanti 

-> Cinque anelli da mano 

-> Quattro uccelli da richiamo 
-> Tre pesci all'amo 

-> Due tortorelle, e 

-> Un merlo nero sopra un pero. 


Scrivi la stringa da cercare: anti 
Hai scritto le seguenti righe: 


-> Dieci bravi regnanti 

-> Nove dame danzanti 

-> Otto fanciulle vocianti 

-> Sette cigni svolazzanti 

-> Sei oche starnazzanti 

-> Cinque anelli da mano 

-> Quattro uccelli da richiamo 
-> Tre pesci all'amo 

-> Due tortorelle, e 

-> Un merlo nero sopra un pero. 
I] campione 'anti' appare 5 volte 
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CONFRONTO DI STRINGHE 


Nel capitolo 4 si è visto che si possono confrontare due stringhe e usarne una 
in un altra posizione nel programma in base al risultato del confronto. Il se- 
guente enunciato IF confronta la variabile risposta$ con la stringa letterale Y 
e stampa un messaggio in base al confronto effettuato: 


risposta$ = "Y" 
IF (risposta$ = "Y") THEN 
PRINT "I due valori stringa sono uguali." 


ELSE 
PRINT "I due valori stringa non sono uguali." 


END IF 


Se si eseguono gli enunciati sopra riportati, si avrà il seguente risultato: 
I due valori stringa sono uguali. 


Se si cambia il valore di risposta$ in y (minuscolo) e poi si esegue l’e- 
nunciato, si avrà un risultato diverso. 


I due valori stringa non sono uguali. 


Perché? Dopo tutto Y è uguale a y ... oppure no? Quali criteri usa QBasic 
per paragonare le stringhe? 


Il set di caratteri ASCII 


Prima di confrontare due caratteri, QBasic deve convertire ciascun carattere 
in un numero usando una tabella di traduzione chiamata set di caratteri 
ASCII. QBasic poi confronta i numeri, detti codici ASCII, e restituisce il valo- 
re logico vero se i codici ASCII sono uguali o falso se i codici non lo sono. 


La sigla ASCII 


Come molti altri termini usati nel linguaggio dei computer, ASCII è una si- 
gla, che sta per American Standard Code for Information Interchange. La pa- 
rola chiave in questa sigla è codice; infatti, come il codice Morse (usato in 
radio e in telegrafia), anche 1’ ASCII è un codice accettato internazionalmente 
per rappresentare caratteri, usato però nei computer € nelle telecomunicazio- 
ni. Nell’appendice B troverete la lista completa del set di caratteri ASCII. 

Ogni carattere nel set ASCII è associato a un solo numero; il set contiene 
in tutto 128 caratteri (codici da 0 a 127): 
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Caratteri di controllo (codici da 0 a 31), che includono caratteri che corri- 
spondono a tasti particolari della tastiera come Invio, ed Esc. 


8 Simboli di punteggiatura, numeri e simboli matematici (codici da 32 a 


64). 
BM Lettere maiuscole dell’alfabeto (codici da 65 a 90). 
BM Lettere minuscole dell’alfabeto (codici da 97 a 122), 
B Simbolieterogenei (codici da 91 a 96 e da 123 a 127). 


Il codice ASCII per la lettera maiuscola A è 65; il codice ASCII per la 
lettera minuscola z è 122. Seguendo questa logica, si capisce ora perché, per 
QBasic, la lettera maiuscola Y e la minuscola y sono due caratteri diversi. 


Il set di caratteri estesi IBM 


L’appendice B contiene un’altra raccolta di caratteri (codici da 128 a 255) 
nota come set di caratteri esteso IBM. Questo set di simboli è stato sviluppato 
dall’IBM per la famiglia di personal computer IBM ed è stato successivamen- 
te adottato dalla maggior parte delle industrie di personal computer. Il set di 
carattere esteso IBM (talvolta chiamato anche set di caratteri ASCII superio- 


re) contiene caratteri di lingue straniere, caratteri per disegnare righe o caselle - 


e simboli matematici. Tali caratteri però non appaiono sulla tastiera; per usar- 
li si deve tenere premuto il tasto Alt e digitare 3 cifre del codice esteso IBM 
(bisogna usare i tasti del tastierino numerico piuttosto che i tasti numerici che 
sì trovano sulla parte superiore della tastiera). Per esempio, per visualizzare il 
simbolo matematico 1 sullo schermo, si deve tener premuto Alt e digitare 227 
sul tastierino numerico. Il seguente enunciato PRINT mostra un valido uso 
del set di caratteri esteso IBM in un programma di QBasic. Il simbolo ;, è sta- 
to scritto tenendo premuto Alt e digitando 168. 


PRINT "è Como se llama?" 


NOTA: Alcuni vecchi monitor non possono visualizzare i 
caratteri del set di caratteri esteso IBM e ci potranno es- 
sere dei problemi per stampare la maggior parte dei 
simboli di tale set di caratteri se la stampante non è stata apposita- 
mente dotata di strumenti in grado di gestirli. Bisogna essere pronti 
a trovarsi di fronte a strani risultati (innocui però) quando si usa 
questo set di caratteri. 


256 


Lar 


Capitolo 9 - Lavorare con le stringhe 


Conversione dei codici ASCII in caratteri 


Se si conosce un codice ASCII ma non si è sicuri quale carattere rappresenti, 
si può usare la funzione CHR$ per visualizzare il simbolo in questione sullo 
schermo o nel programma. 

La sintassi per la funzione CHR$ è la seguente: 


CHR$ (codice) 


codice è un valore intero che indica un codice ASCII o IBM. Il valore re- 
stituito da CHR$ può essere assegnato a una variabile stringa o usato come 
argomento per un enunciato o funzione che accetta valori stringa. 


Esercizio: Uso della funzione CHR$ 


Il programma ASCILBAS (figura 9-18) mostra come usare la funzione 
CHR$ per visualizzare il set esteso di caratteri IBM e il set ASCII SI noti che 
il programma salta i primi 32 caratteri (di controllo) del set di caratteri ASCII 
e fa una pausa dopo ogni multiplo di 23 righe (eccetto il primo e l’ultimo set) 
così si possono osservare i risultati con calma. si o 

Scrivete ed eseguite il programma ASCII.BAS (per ragioni di spazio, in 
questo caso non mostreremo il risultato del programma). 


Figura 9-18. Un programma che usa la funzione CHR$ per visualizzare i set di ca- 
ratteri IBM e ASCII. 
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Conversione di caratteri in codici ASCII 


Oltre alla funzione CHR$ esiste anche la funzione ASC che esegue il compi- 


to contrario, converte cioè un carattere nel suo rispettivo codice. 
La sintassi della funzione ASC è la seguente: 


ASC (espressionestringa) 


espresslonestringa è una stringa composta da un solo carattere. Il valore 
Intero restituito da ASC può essere assegnato a una variabile intera o usato 
come argomento per un enunciato o funzione che accetta valori interi. 


Esercizio: Uso della funzione ASC 


Il programma CONFR.BAS (figura 9-19) usa la funzione ASC per mostrare 
come QBasic confronta i caratteri. CONFR chiede all’utente due caratteri e 
poi usa l’enunciato SELECT CASE per visualizzare uno dei tre messaggi ba- 
sati sui valori numerici restituiti da ASC. 

Scrivete ed eseguite il programma CONFR.BAS. 


Figura 9-19. Un programma che usa la funzione ASC per confrontare due caratteri. 


258 


Capitolo 9 - Lavorare con le stringhe 


Otterrete un risultato simile a questo: 


Scrivi un carattere qualsiasi: d 
Scrivi un altro carattere: j 


'd' viene prima di 'j 
perché 100 è maggiore di 74 


Uso di operatori relazionali con le stringhe 


Oltre alle equivalenze fra caratteri, in QBasic troviamo anche confronti di 
stringa con 1 seguenti operatori relazionali: 


Operatore Significato Operatore Significato 
<> non uguale > maggiore di 
— uguale < = minore o uguale a 
< minore di | SE maggiore o uguale a 


Un carattere è “maggiore” di un altro se il suo codice ASCII è maggiore. 
Per esempio, il valore ASCII della lettera B è maggiore del valore ASCII del- 
la lettera A, così l’espressione 


tK] A Lt] < If B I 
è vera, e l’espressione 
ch] A ti] > tK] B H 


è falsa. 

Quando confronta due stringhe, ognuna delle quali contiene più di un ca- 
rattere, QBasic comincia a paragonare il primo carattere della prima stringa al 
primo carattere della seconda e poi va avanti carattere per carattere fino a 
quando trova una differenza. Per esempio, le stringhe Mike e Michael sono 
uguali fino al terzo carattere (K e C). Poiché il valore ASCII di K è maggiore 
di quello di C, l’espressione 


"Mike" > "Michael" 


è vera. 

Se QBasic non trova alcuna differenza, le due stringhe sono uguali. Se 
due stringhe sono uguali per molti caratteri ma una delle stringhe continua e 
l’altra si ferma, la stringa più lunga è maggiore di quella più corta. Conside- 
riamo questo esempio: 
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MAAAAA" > "AAA" 


è vera. 


Ordinamento di stringhe: il programma STRSORT.BAS 


Il programma STRSORT.BAS (figura 9-20) usa l’operatore relazionale <= 
per confrontare degli elementi di matrice e usa l’enunciato SWAP per sposta- 
no gli elementi che sono fuori posto. 

STRSORT dichiara una matrice di stringhe detta linee/nput$ e chiama il 
sottoprogramma RiceviTesto, che è lo stesso sottoprogramma che avete già 
incontrato in RIPETI.BAS (figura 9-17): RiceviTesto legge le righe di testo in 
una matrice e poi restituisce la matrice (lineelnput$) e il numero degli ele- 
menti nella matrice (numDiElementi%) al programma centrale. 

STRSORT chiama poi il sottoprogramma ShellSort, si osservino i se- 
guenti enunciati al centro di ShellSort che confrontano gli elementi della ma- 
trice e poi spostano gli elementi se sono fuori posto: 


IF matriceStringa$ (j%) <= matriceStringa$ (j% + intervallo&) THEN 
EXIT FOR 

‘ scambia gli elementi della matrice che sono fuori posto 
SWAP matriceStringa$ (j%), matriceStringa$ (j% + intervallo%) 


L'operatore relazionale <= viene usato per confrontare i due elementi 
della matrice. 


B&B Seiil valore dell’espressione stringa matriceStringa$ (j%) è minore del 
valore dell’espressione stringa matriceStringa$ (j% + intervallo%), gli 
elementi sono al posto giusto e l’enunciato EXIT FOR fa terminare il lo- 
op di tipo FOR. 


3 Seil valore della seconda espressione stringa è maggiore del valore della 
prima, gli elementi vengono scambiati grazie all’enunciato SWAP. 
SWAP, che qui incontrate per la prima volta, cambia i valori di una delle 
due variabili dello stesso tipo. In questo caso vengono scambiati i valori 
delle due variabili stringa. Quando la matrice è ordinata, viene trasferita 


di nuovo al programma principale e stampata per intero da un loop di tipo 
FOR. 


Esercizio: Uso dell’operatore relazionale <= e dell’enunciato SWAP 


Scrivete ed eseguite il programma STRSORT.BAS. Se avete scritto il pro- 
gramma RIPETI.BAS (figura 9-17), potete usarlo come base per il program- 
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ma STRSORT.BAS eliminando la funzione Ripeti (premere F2, evidenziare 
Ripeti, e premere Canc); selezionate poi il testo nel programma principale e 
cancellatelo. Scrivete il sottoprogramma ShellSort e il nuovo programma 
principale e poi salvatelo come STRSORT.BAS. 


O ShellSort 


- a ShellSort è è basata uu me. 1... 
. Shell Jon. che ordina una matrice di numeri, pubblicato nel 1959 da Do- 
— nald Shell. Shell Sort ordina una lista di elementi dividendo ripetutamente 
- la lista principale in sottoliste più piccole della metà È confrontando. gli . 
- elementi i in cima e alla fine delle sottoliste. Se gli elementi sono. fuori pol 
< sto, n cambiati. Il risultato finale è è ‘una a matrice div voci in n ordine . 


. STRSORT. BASI wv0Ò_m4@mu - 
. to programma | ri chiede all: u tente una li i. i! 


Figura 9-20. Un programma che ordina un elenco di stringhe digitate dall’ utente 
(continua). 
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—- ‘essere s scri ritte. 


Figura 9-20. Un programma che ordina un elenco di stringhe digitate dall’ utente. 


Otterrete un risultato simile a questo: 


Scrivi fino a 15 righe di testo; per finire, premi Invio in una 
nuova riga. 


-> Gennari, Michela 
-> Triestini, Luigi 
-> Gennari, Davide 
-> Zucchi, Evelina 
-> Gennari, Mario 

-> Zucchi, Vittorio 
-> Berenga, Riccardo 
-> Grandi, Emma 


Figura 9-20. Un programma che ordina un elenco di stringhe digitate dall’ utente 
(continua). 
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Risultati dell'ordinamento: 


DOMANDE ED ESERCIZI 


1. Vero o Falso: le costanti stringa sono per regola scritte in caratteri maiu- 
scoli. 


Berenga, Riccardo 
Gennari, Davide 
Gennari, Mario 
Gennari, Michela 
Grandi, Emma 
Triestini Luigi 
Zucchi, Evelina 
Zucchi, Vittorio 


2. Vero o Falso: la seguente dichiarazione di una stringa a lunghezza fissa è 
un’enunciato valido: 


DIM cognome$ AS STRING * 20 


3. Quale risultato produce il seguente enunciato? 


PRINT "ONE" + "TWO" + "THREE" 


SOMMARIO 


In questo capitolo si sono affrontate molte nuove funzioni ed enunciati, circa 
15 in tutto: | 


8 UCASE$S, LCASES. 


4. Quale dei seguenti valori può essere usato come argomento alla funzione 
LEN? 


a. Una stringa letterale. 
b. Una costante stringa. 


si c. Una variabile stringa. 

2 RIGHT$, LEFT$, MID$. d. Il risultato di una funzione stringa. 

83 RTRIM$,LTRIMS. 5. Che cosa è accaduto se quando si chiama la funzione INSTR viene resti- 
sa LINEINPUT. tuito il valore 0? 

8 SPACE$ STRING$ 6. Che cosa visualizza il seguente enunciato? 

8 INSTR PRINT CHR$ (ASC("h") - 32) 

3 CHR$,ASC. 7. Qual è il codice ASCII per la lettera M? 

8 SWAP. 8. Scrivete un programma che richieda all’utente nome e cognome, conver- 


ta i nomi in lettere maiuscole e poi li stampi con la formattazione Cogno- 


Si è anche visto come dichiarare, combinare, separare, paragonare e ordi- me, Nome. 
nare delle stringhe. Tutti gli strumenti per lavorare con le stringhe visti in 
questo capitolo sono molto utili perché consentono di lavorare con molti dati 
(e gran parte di ciò che si fa con i personal computer implica l’uso di grandi 
quantità di dati). Nel prossimo capitolo si discuterà appunto sui modi più effi- 
caci per gestire grandi quantità di dati. | 10. Scrivete un programma che riceva dall’utente un nome composto da tre 

parti (nome, secondo nome, cognome) con una stringa a lunghezza varia- 
bile e copi ciascun nome della stringa in una variabile stringa separata. 

Il programma dovrebbe poter trattare nomi di qualsiasi lunghezza, purché 
l’utente separi i tre nomi con gli spazi. Il risultato del programma dovreb- 
be assomigliare a questo: 


9. Scrivete un programma che riceva dall’utente una stringa a lunghezza va- 
riabile, inverta l’ordine dei caratteri nella stringa e visualizzi la nuova 
stringa. 
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SIRENE 
RINO STASI SCONO INCI IIVULISN IIIIIISIIIIZ OSSIA SOI IIS VAILATI NT 
NISUCIO IRR AI LIAN GAIA SII IIS SLIGO CRE La 


Lavorare 
con 1 file 


Scrivi una stringa: Queen Victoria Belfield 
Nome: Queen 

Secondo nome: Victoria 

Cognome: Belfield 


ISO ELISIR 
VERRETE: 


SI 


SMESSO IESISOISE 
RI IRA IRON DIS 
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N ei due precedenti capitoli abbiamo visto come gestire grandi quantità di dati 
in un programma. In questo capitolo vedremo come salvare i dati su disco e 
recuperarli quando necessario; vedremo anche come mandare in stampa il ri- 
sultato di un vostro programma. 


CREAZIONE E USO DI FILE SEQUENZIALI 


Un file è semplicemente una raccolta di dati conservata su disco. Un tipo di 
file che potete creare dall’interno di un programma scritto in QBasic è un file 
sequenziale. I contenuti di un file sequenziale devono essere usati dall’inizio 
alla fine in un ordine specifico (diversamente dai file ad accesso casuale, che 
non analizzeremo in questo libro, i cui contenuti possono essere usati in qual- 
siasi ordine). Per creare e lavorare con file sequenziali si usano gli enunciati e 
le funzioni seguenti: 


Descrizione 


Enunciato/Funzione 


OPEN Apre un file 

CLOSE Chiude un file 

PRINT# Stampa in un file dati non formattati 
PRINT# USING Stampa in un file dati formattati 

WRITE# Stampa in un file dati organizzati in campi 
INPUT# Recupera dati da un file 

EOF Controlla la fine di un file 

LINE INPUT# Recupera un'intera riga di dati da un file 


In questo capitolo analizzeremo questi enunciati e queste funzioni in det- 
taglio per imparare a usare file sequenziali per registrare diversi tipi di infor- 
mazioni (da un semplice diario ai contenuti di un complesso database). 


NOTA: Per semplificare il processo di apprendimento, i 
file di questo capitolo verranno creati nell'unità e nella 
| directory corrente (senza cioè l’uso di percorsi per file e 
directory). Naturalmente QBasic è pienamente compatibile col siste- 
ma di gestione di file e directory del DOS. 
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Creazione e apertura di un file 


L’enunciato OPEN svolge una doppia funzione: viene usato sia per creare 
nuovi file che per aprire file esistenti. La sintassi dell’enunciato OPEN sì pre- 


senta in questo modo: 
OPEN nomefile FOR modalità AS #numerofile 


nomefile è un qualsiasi nome di file valido per il DOS, modalità è una pa- 
rola che indica come il file dev’essere usato e numerofile è un intero da 1 a 
255 associato al file che viene aperto. 


NOTA: Siccome a ciascun file viene assegnato un nume- 
ro questo può essere usato per chiamare il file all'inter- 
no del programma. È consigliabile numerare i file 
all’interno del programma partendo da 1. Notate infine che l'asse- 
gnazione dura fino alla chiusura del file. 


Specificare una modalità 

Le modalità in cui un file può essere aperto sono tre, ma se ne può impiegare 
una sola alla volta; l'argomento modalità serve a specificare come si intende 
usare il file sequenziale. Gli argomenti utilizzabili per modalità in un enun- 
ciato OPEN sono i seguenti: 


Modalità Descrizione 
OUTPUT Crea e apre un file che riceverà un output dal programma. 
| Se il file esiste già, i contenuti precedenti vengono cancellati. 
APPEND Apre un file esistente a cui viene aggiunto un ouipui del programma; 
l’output, cioè, viene aggiunto alla fine del file. 
| contenuti originali del file vengono conservati. 


INPUT Apre un file che il programma può solo leggere ma non modificare. 
Il programma non può cambiare il file ma può usarne il contenuto 
come input. 


I EL TTttTIEIéImt°©*eè*»Wlileldeed//7HWWW 


Vedremo ora alcuni esempi di enunciati OPEN che mostrano l’uso di cia- 


scuna modalità. 

L’enunciato che segue apre il file sequenziale NOMI.TXT, che Memoriz- 
za un output proveniente dal programma. Se questo file non esiste QBasic lo 
crea; se esiste già QBasic ne cancella i contenuti. NOMI.TXT è associato al 


numero 1. 
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OPEN "NOMI.TXT" FOR OUTPUT AS #1 


L’enunciato che segue apre il file esistente NOMI.TXT e lo associa al 


numero 1. Il programma colloca il suo output alla fine dei contenuti esistenti 


di NOML.TXT. 
OPEN "NOMI.TXT" FOR APPEND AS #1 


L'ultimo enunciato apre il file esistente NOMI.TXT e lo associa col nu- 
mero 1. Il programma può usare i contenuti di NOMI.TXT come input. 


OPEN "NOMI.TXT" FOR INPUT AS #1 


Uso di una variabile stringa con OPEN 


L’enunciato OPEN permette di usare anche una variabile stringa al posto di 
nomefile. Per esempio è possibile chiedere all’utente di fornire il nome di un 
file che poi viene assegnato a una variabile e usare quest’ultima all’interno 
dell’enunciato OPEN, come mostra l’esempio seguente: 


INPUT "Che file desiderate aprire? ", nomefile$ 
OPEN nomefile$ FOR OUTPUT AS #1 


Può essere molto utile usare ciò che avete appreso nel capitolo 9 per far 
in modo che il programma verifichi che la risposta dell’utente (nomefile$) sia 
valida per il DOS prima di provare ad aprire il file. 


Chiusura di un file 


Quando sl è terminato di usare un file bisogna assicurarsi che questo venga 
chiuso con l’enunciato CLOSE. In questo modo tutte le informazioni raccolte 
nel file vengono effettivamente salvate su disco. Dopo la chiusura, il numero 
associato al file può essere assegnato a un altro file. | 

La sintassi dell’enunciato CLOSE è la seguente: 


CLOSE [#numerofile] 


numerofile è il numero associato al file da chiudere; ricordatevi che se 
questo argomento non viene specificato tutti i file vengono chiusi. Per usare 
nuovamente un file dopo la chiusura lo si deve riaprire nei modi specificati in 
precedenza. 


Ecco altri esempi relativi all’enunciato CLOSE. L’ i 
chiude il file 1: A RAMICalo:cHesscglie 
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CLOSE #1 


Quest’altro enunciato chiude tutti 1 file: 


CLOSE 


NOTA: Anche se QBasic al momento dell’ uscita, chiude 
automaticamente tutti i file aperti, è consigliabile abi- 
tuarsi a chiudere tutti i file non appena si è terminato di 
utilizzarli altrimenti si corre il rischio che il programma perda dei 
dati in caso di eventi imprevisti come la mancanza di corrente. 


Archiviare informazioni in un file 


Quando un file è stato aperto in modalità OUTPUT o APPEND è in grado di 
ricevere informazioni dal programma. Vi sono tre enunciati di QBasic che 
possono inviare informazioni a un file sequenziale aperto: 


8 L’enunciato PRINT# invia a un file dati non formattati. 
83 L’enunciato PRINT# USING invia a un file dati formattati. 
s L’enunciato WRITE# invia a un file dati organizzati in campi. 


I paragrafi che seguono descrivono questi tre enunciati in dettaglio. 


L’enunciato PRINT# 

L’enunciato PRINT# è funzionalmente simile a PRINT ma invece di inviare 
dati allo schermo li invia a un file. La sintassi dell’enunciato PRINTF# è la se- 
guente: 

PRINT #numerofile, [espressioneLista][,|;] 


numerofile è il numero del file aperto; espressioneLista è l’informazione 
da inviare al file. Se si omette quest’ultimo argomento QBasic invia al file 
una riga vuota. 

L'argomento espressioneLista può essere composto da più elementi, pur- 
ché siano separati da virgole o punti e virgola (questi svolgono esattamente la 
stessa funzione che svolgono nel consueto enunciato PRINT. Se un punto e 
virgola è l’ultimo carattere contenuto nell’enunciato PRINT#, il successivo 
elemento inviato al file appare alla fine della riga che avete appena inviato. 
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a Esercizio: Archiviazione di dati non formattati in un file 


Il programma AUTODATI.BAS (figura 10-1) mostra come usare l’enunciato 
PRINTF# per inviare tre righe di dati non formattati a un file dal nome AUTO- 
DATI.TXT. I valori inviati a un file possono essere valori letterali, variabili 
semplici o il risultato di funzioni o espressioni. 

Scrivete ed eseguite il programma AUTODATI.BAS. 

Il risultato ottenuto dovrebbe essere simile a questo: 


è Questo rog a 
ormazi( 
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Inserire la marca di una macchina della vostra collezione: Alfa Romeo 
Qual è il nome del modello? Giulietta 
Qual è l'anno di fabbricazione? 1956 


» 


L'informazione è stata trasferita con successo al file AUTODATI.TXT 


Un file dal nome AUTODATI.TXT viene creato nella directory e nell’u- 
nità corrente. Per visionare il file basta uscire da QBasic e scrivere il seguente 
comando DOS: 


type autodati.txt 


Il risultato sarà simile a questo: 


Alfa Romeo Giulietta 1956 
Mercedes-Benz 190 SL 1959 
Audi 80 Quattro 1991 


L’enunciato PRINT# USING 


L’enunciato PRINT# USING segue le stesse regole e usa gli stessi caratteri 
speciali di formattazione dell’enunciato PRINT USING ma invia dati format- 
tati a un file invece che allo schermo. PRINT# USING è utile quando si vo- 
gliono inviare a un file grandi quantità di dati tabulari. La sintassi di questo 
enunciato è la seguente: 


PRINT #numerofile, USING modello; [espressioneLista][,|;] 


numerofile è il numero del file aperto, modello è una stringa usata per 
formattare i valori di espressioneLista, ed espressioneLista è il dato da for- 
mattare e da inviare al file (si possono usare virgole o punti e virgola per se- 
parare i valori in espressioneLista). I caratteri di formattazione nel modello 
devono essere in relazione uno a uno con i valori presenti in espressioneLista. 


Esercizio: Conservazione di dati formattati in un file 


Il programma FRUTTA.BAS (figura 10-2) mostra come usare l’enunciato 
PRINT# USING per inviare tre righe di dati formattati al file FRUTTA.TXT. 
Il modello di formattazione in questo programma è la variabile stringa 1mp$ 
che usa vari caratteri speciali di formattazione per allineare i dati vertical- 
mente prima di inviarli al file. 

Scrivete ed eseguite il programma FRUTTA.BAS. 
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': FRUTTA.E BASO 


. Questo. programma. usa 1° ‘enunciato PRINTE USING per ‘inviare tre 
L di informazioni formattate. a un file segaziale.. 


Un file dal nome FRUTTA.TXT viene creato nell’unità e nella directory 
corrente; per esaminarlo basta uscire da QBasic e digitare il seguente coman- 
do DOS: 


\ OPEN “FRUTTA. Tare FOR OUTPUT AS au apre ti file. type frutta.txt 


nell unità/directory corr o. __ 
1... _. - Li ‘zzz. .._. L’output ottenuto dovrebbe essere simile a questo: 


Frutta: Pera Casse: 10 Prezzo/Chilo: L5.300 
1. _ | _- Frutta: Ciliege Casse: 2 Prezzo/Chilo: = L10.000 
crea un modelo. di | formattazione per. i ‘enunciato PRINTA USING. Frutta; Melone Re ni Prezzo/Chilo: L3.500 
DE Frutta: | . use: 00 | Prezzo/Chilo: i; - L’enunciato WRITE# 


L’enunciato WRITE# non formatta il proprio output come fanno gli enunciati 
PRINT e PRINT# USING ma crea un file che potrà essere letto da altri pro- 
grammi (questo enunciato verrà usato più avanti in questo capitolo per la 
creazione di file di database). L'informazione che l’enunciato WRITE# invia 
a un file sequenziale è separata da virgole ed è organizzata in gruppi, detti 


PRI 4, usIno tuoî; druetas; casser; costo. _. . |. . - SA. 


| riceve le informazioni dall ‘utente e trasferisce nel. file aperto 


INPUT “Scrivete ii vostro frutto siii , fruttaf. 


INPUT "Quante. casse volete. acquistarne? ", casse “_- 
P Ide costa. al chilo? .. costo! _@ 


La sintassi di WRITE# si presenta in questo modo: 
WRITE #numerofile[, espressioneLista] 


numerofile è il numero del file aperto; espressioneLista rappresenta le in- 
formazioni da inviare al file (gli elementi in essa contenuti vengono separati 
da virgole). Ricordate che se non si inserisce l'argomento espressioneLista, il 
file riceverà una semplice riga vuota. 

La figura 10-3 mostra un esempio di enunciato WRITE# che invia a un 
file cinque tipi di valori. Notate come le virgole tra i valori separino l'output 
nei campi; notate anche che il valore stringa si trova tra doppi apici. Infatti, se 


| FRUTTA. oi . —. - i .- -. i . - Li 3 3 dii . - la stringa contenesse spazi o virgole, un programma non in QBasic li identifi- 
ann;I'l__ÀM.=.=—_—=*AK**t+IttiBîAîtiîAî}ÌTTa*p***pFù}—.—.’.ÎÌNTMÀM!lON!’Z.*Wuì&a&;a i cherebbe come elementi della stringa). Ogni riga del file creato con WRITE# 
Figura 10-2. Un programma che mostra l’uso di PRINT# USING. viene detta registro (record). 


. Esercizio: Archiviazione di dati in un file con i campi 
Il risultato che otterrete sarà simile a questo: ea 
Ì 


Il programma MONETE.BAS (figura 10-4) mostra come usare l’enunciato 
WRITE# per archiviare informazioni su una collezione di monete in un file 
detto MONETE.TXT. MONETE.BAS è creato in modo da consentire all’u- 
tente l’immissione di informazioni su un numero desiderato di monete. Per 


Scrivete il vostro frutto preferito: Pera 
Quante casse volete acquistarne? 10 
Quanto costa al chilo? L5.300 


L'informazione è stata trasferita con successo al file FRUTTA.TXT 
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i MONETE. BASI n. o . e 

|" Questo programma usa. 1 enunciato MRITEAO per inviare a i un ul c_ ’’Ò»0 
i ‘sequenziale. liformezioni: su una collezione di monete, _..- 
. suddivise | in li I \.'\{_{.. 


Un esempio di programma: 


OPEN "TESTO.TXT" FOR OUTPUT AS #1 + Enunciato OPEN 


af = "Giuseppe" 

b% = 25 

c& = 100000 e ee eee“ ““ Variabili di esempio 
di-= 1155 

e# = .0123456789# 


i i file nell P'umita/ . 


"MONETE. sr FOR OUTPUT AS #1 _ ap le 
| directory. 


‘PEN * 


WRITE #1, ag, b&, c&, dl, ef <«+—____—____— Enunciato WRITE# 
CLOSE #1 


i = li a e E unicialo: CLOSE 


Output inviato al file: 


"Giuseppe", 25, 100000, 115.5, .0123456789# 


Campo 1 Campo 2 Campo 3 Campo 4 Campo 5 


—: a di _- proviene da moneta? *. .».__ 
1 Suu = ci THEN "se nazione$ @ FINE non > 
_..’ — ì i | trasferisce dati nel. file. 


Figura 10-3. L’enunciato WRITE# archivia i dati in un file in campi e registri. 


interrompere l'inserimento di dati basterà scrivere FINE alla richiesta di in- 
formazioni sulla nazionalità della moneta. 


Scrivete ed eseguite il programma MONETE.BAS. 
Il risultato dovrebbe essere simile a questo: 


Questo programma archivia le informazioni sulla collezione di monete 
in un file dal nome MONETE.TXT. Inserire i dati: premere FINE per 
uscire. 


Da quale paese proviene la moneta? Stati Uniti 
Qual è il valore della moneta? 10 centesimi 


Qual è il nome della moneta? Dime i PRINT “L'informazione è Stata trastertta con Seressi Si | 0. 


In quale anno è stata emessa? 1980 


Figura 10-4. MONETE.BAS. Un programma che dimostra l’ enunciato WRITEF. 


Da quale paese proviene la moneta? Canada 

Qual è il valore della moneta? 25 centesimi Ì Qual è il nome della moneta? 

Qual è il nome della moneta? Quarter In quale anno è stata emessa? 1955 
In quale anno è stata emessa? 1960 


Da quale paese proviene la moneta? Gran Bretagna 


Da quale paese proviene la moneta? Ungheria Qual è il valore della moneta? 1 sterlina 
Qual è il valore della moneta? 2 forints Qual è il nome della moneta? Pound 
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In quale anno è stata emessa? 1981 


Da quale paese proviene la moneta? FINE 


- 


L'informazione è stata trasferita con successo al file MONETE.TXT 


Un file dal nome MONETE.TXT viene creato nell’unità e nella directory 


a per verificarlo basta uscire da QBasic e digitare il seguente coman- 
O ” 


type monete.txt 


L’output che otterrete sarà simile a questo: 


"Stati Uniti", "10 centesimi", "Dime",1980 
"Canada", "25 centesimi", "Quarter",1960 
"Ungheria","2 forints","". 1955 

"Gran Bretagna","1 sterlina", "Pound",1981 


| Il file MONETE.TXT contiene quattro registri composti di quattro campi 
ciascuno, come mostrato nella figura 10-5. 


Impiego di un file come input di dati 


Dopo aver visto come creare tre diversi tipi di file e come esaminazrli attraver- 
so il comando TYPE del DOS, cercheremo ora di spiegare come esaminare e 
usare questi file di dati all’interno di un programma in QBasic. In particolare 
prenderemo in esame due enunciati e una funzione che servono per lavorare 
con file aperti per avere informazioni: 


3 L’enunciato INPUTF# riceve da un file uno 0 più campi di dati. 
@ Lafunzione EOF determina se è stata raggiunta la fine del file. 


8 L’enunciato LINE INPUT# riceve da un file un’intera riga di dati. 


L’enunciato INPUT# 


L'enunciato INPUT# è il principale strumento per ottenere dati da un file se- 
quenziale di QBasic. Questo enunciato riceve l’input da un file sequenziale 
nello stesso modo in cui l’enunciato INPUT lo riceve dalla tastiera. Entrambi 
questi enunciati assegnano uno o più elementi di informazione a variabili del- 
lo stesso tipo. La sintassi di INPUT# è la seguente: 


INPUT #numerofile, variabileLista 
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RECORDI Stati Uniti", "10 centesimi", Dime ,1980 
RECORD2 _ > Canada","25 centesimi", "Quarter",1960 


RECORD3 —_ _—» "Ungheria","2 forints","",1955 
RECORD 4 "Gran Bretagna","1 sterlina", "Pound",1981 


Figura 10-5. Ogni riga contenuta nel file MONETE.TXT è un registro composto di 
quattro campi. 


numerofile è il numero del file aperto; variabileLista indica le variabili 
cui vengono assegnati i dati ricevuti dal file. Gli elementi contenuti nell’argo- 
mento variabileLista devono essere dello stesso tipo di quelli che si trovano 
nel file sequenziale; questi possono essere campi di dati creati con l’enuncia- 
to WRITE# o output dell’enunciato PRINT#, PRINT# USING o di qualsiasi 
altro programma in grado di creare file di dati. 


de Esercizio: Lettura di elementi di informazione da un file sequenziale 


Il programma AMICI.BAS (figura 10-6) mostra come usare l’enunciato IN- 
PUT# per ottenere dati da un file sequenziale. Il programma che segue apre 
un file sequenziale nella directory corrente in modalità output e vi immette 
quattro stringhe, usando WRITE#; poi chiude il file, lo riapre in modalità in- 
put e riporta le quattro stringhe nel programma. 

Scrivete ed eseguite il programma AMICI.BAS. 

Il risultato ottenuto sarà simile a questo: 


Scrivete il nome di quattro vostri amici 


Nome: Andrea 
Nome: Sandro 
Nome: Fabio 

Nome: Davide 


Avete inserito i nomi seguenti: 


Andrea 
Sandro 
Fabio 

Davide 


Il file AMICI.TXT creato sul disco conterrà i seguenti registri di dati: 


DIO 
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|! Questo programma 


Figura 10-6. Un programma che mostra l’uso dell’enunciato INPUT. 


"Andrea" 
"Sandro" 
"Fabio" 

"Davide" 


La funzione EOF 


Se il programma in QBasic non è in grado di determinare dove finisce il file 
sequenziale si puo ricevere un messaggio di errore end-of-file (fine del file); 
questo errore si verifica quando QBasic cerca di leggere oltre la fine del file. | 
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Per evitare questo errore basta indicare a QBasic di terminare la lettura 
dei valori quando incontra la fine del file; a questo scopo si usa la funzione 
EOF, che presenta questa sintassi: 


EOF (numerofile) 


numerofile è il numero del file aperto che si vuole controllare. 

EOF restituisce il valore logico vero se il successivo carattere da leggere 
si trova oltre la fine del file e fa/so nel caso opposto. 

È possibile usare la funzione EOF in un qualsiasi punto del programma 
per controllare un file aperto, ma la sua collocazione ottimale è in un loop 
DO, come evidenziato dall’esercizio che segue. 


Esercizio: Individuazione della fine di un file 


Il programma MONETE2.BAS (figura 10-7) è un miglioramento del pro- 
gramma MONETE.BAS visto in precedenza. Il programma usa l’enunciato 
INPUTF# per visualizzare i dati del file e la funzione EOF per controllare la fi- 
ne del file. La nuova versione del programma apre il file che contiene i dati 
sulla collezione di monete in modalità APPEND in modo da evitare che le in- 
formazioni precedentemente raccolte vengano sovrascritte da quelle nuove; 
quest’ultime vengono collocate alla fine del file. 

Scrivete ed eseguite il programma MONETE2.BAS 

AI momento dell'esecuzione il programma richiederà le informazioni nel 
modo seguente: 


Questo programma raccoglie le informazioni su una collezione di 
monete su disco in un file dal nome MONETE.TXT. Inserire i dati; 
digitare FINE per uscire. 


Da quale paese proviene la moneta? 0landa 
Qual è il valore della moneta? 2.5 guilders 
Qual è il nome della moneta? Rijksdaalder 
In quale anno è stata emessa? 1982 


Da quale paese proviene la moneta? FINE 
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Figura 10-7. Un programma che mostra l’uso della funzione EOF e dell’ enunciato 
INPUTE. 


Dopo aver inserito le nuove informazioni queste vengono visualizzate 
sullo schermo insieme a quelle già conservate nel file: 


Figura 10-7.U I Origine Valore Nome Anno 

Ura iU-/. Un programma che mostra l’uso della funzio RRPRPRRO(i([DbDN)!”!léÉéb)bbbbbòbpbpbpb‘ee=* tt oo b;-,:-_]_R _ NEW (ile 
ne EOF e dell’ enunciato 

INPUT (continua). Stati Uniti 10 centesimi Dime 1980 

Canada 25 centesimi Quarter 1960 

Ungheria 2 forints 1955 

Gran Bretagna 1 sterlina Pound 1981 

Olanda 2.5 guilders Rijksdaalder 1982 
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L’enunciato LINE INPUT 


L'enunciato INPUT# è un modo efficace per leggere elementi singoli dai file; 
se però si vogliono trasferire lunghe stringhe di informazioni testuali, QBasic 
mette a disposizione l’enunciato LINE INPUT+#. L’enunciato è simile a LINE 
INPUT con la differenza che riceve il proprio input da un file invece che dal- 
la tastiera. La sintassi dell’enunciato LINE INPUTF# è la seguente: 


LINE INPUT #numerofile, nomevariabile$ 


numerofile è il numero del file aperto da cui trasferire le informazioni; 
nomevariabile$ è il nome della variabile stringa che deve ricevere l’input. 


na inviare i... a una stampante > al computer si ui usa re e 
- nunciato > LPRINT, lac cui i sintassi è simile a Mica d dell’enunci; 


.. _ è una a lista di i espressioni stringa o > numeriche sepa- | 
. Tate da i o i 


Esercizio: Lettura di un diario con LINE INPUT# 


Il programma DIARIO.BAS (figura 10-8) mostra come usare gli enunciati 
LINE INPUT e LINE INPUTF# per scrivere ampi brani di testo in un file se- 
quenziale. DIARIO.BAS viene prima aperto in modalità APPEND e viene 
poi marcato con l’ora e la data corrente dall’orologio di sistema. L’utente può 
aggiungere una o più righe al diario che viene poi conservato nel file DIA- 
RIO.TXT nella directory corrente. Poiché il file del diario viene aperto in 
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modalità APPEND ogni informazione viene aggiunta alla fine del file, senza 
che il contenuto precedente vada perso. Se l’utente richiede una stampa, tutte 
le informazioni (inclusa la data e l’ora) vengono inviate alla stampante dagli 
enunciati LPRINT. 

Scrivete ed eseguite il programma DIARIO.BAS. 

AI momento dell’esecuzione il programma richiede di completare il dia- 
rio nel modo seguente: 


Scrivete i vostri pensieri giornalieri; digitate FINE per uscire. 


Dopo aver digitato le informazioni e la parola FINE, il programma effet- 
tua la seguente richiesta: 


Desiderate stampare il diario su carta (S,N)? 


Se la risposta è Sì, il programma invia alla stampante una copia del dia- 
rio. 


Figura 10-8. Un programma per un semplice diario che mostra l’uso di LINE IN- 
PUTA (continua). 
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FOR INPUT AS #1 'apre il fi 


IF (Ue 


Figura 10-8. Un programma per un semplice diario che mostra l’uso di LINE IN- 
PUTE. 


L’enunciato VIEW PRINT 


L'ultimo enunciato che vedremo in questo paragrafo è VIEW PRINT; l’enun- 
ciato non viene usato direttamente coi file ma spesso viene impiegato in com- 
binazione con INPUT#, LOCATE e PRINT per visualizzare il contenuto di 
un file in posti diversi dello schermo. Fino ad ora abbiamo usato per l’output 
di enunciati come PRINT l’intero schermo; quando questo è completo altri 
enunciati PRINT lo fanno scorrere. Con l’enunciato VIEW PRINT è possibi- 
le restringere l’output solo a una parte dello schermo (detta finestra di testo) 
mantenendo inalterato il resto. La sintassi di VIEWPRINT è la seguente: 


VIEW PRINT [lineaSup TO lineaInf] 


lineaSup e linealnfrappresentano la linea superiore e quella inferiore del- 
la finestra di testo; se queste due informazioni non vengono specificate la fi- 
nestra di testo corrisponde all’intero schermo. 
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Una volta definita la finestra di testo, lo scorrimento avviene solamente 
tra la linea superiore e inferiore della finestra. Ciò può essere molto utile 
quando si vuole visualizzare un elenco di istruzioni o le intestazioni di una ta- 
bella evitando che queste escano dallo schermo. Notate che quando una fine- 
stra di testo è attiva si può usare l’enunciato 


CLS 2 


per ripulire il contenuto della finestra stessa, lasciando intatto il resto del- 
lo schermo. 


Esercizio: Creazione di una finestra di testo 


Il programma VIEW.BAS (figura 10-9) mostra l’uso degli enunciati VIEW 
PRINT, LOCATE, PRINT e CLS. Maggiori informazioni su questi enunciati 
verranno fornite più oltre quando vedremo come creare un programma per un 
database. 

Se eseguite questo programma potrete vedere lo schermo con una finestra 
di testo divisa, come si vede nella figura seguente. 


Benvanuti nel programma VIEW? 


Osserviamo lo scorrere di alcune informazioni... 


Questa 
Questa 
uesta 
Questa 
Questa 
Questa 
Questa 
Questa 
Questa 
Questa 
Questa 
Questa 
Questa 
Questa 


Premere Invio per pulire la finestra di testo... 
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i Questo programma mostra Li uso 0 detta enunciato Mai PRINT 


| ° iii... 0 -_-+> 


tile i Benven ì nei prosranme 


PRINT . 
| PRINT. "Osserviamo lo scorrere di 
RAT > - i 


'LOCATE 24, 1: _- ST .. ai 
LOCATE 25, 1: INPUT ; "Pre 
L- chi SI _ _ _° 


testo (righe 5-23) 


- - ui "asta è 1a ig; 1 
NEXT ig . _— Ò 
Su I... 


n. gio 200 volt 


VIEN PRINT. i po . _- 
toc CATE E 25, Li 


A i i - . Ta finestra di testo | ____- 


Figura 10-9. Un programma che mostra l’uso dell’ enunciato VIEW PRINT. 


Enunciati di QBasic equivalenti a comandi di DOS 


Molti enunciati di QBasic hanno delle controparti nel mondo DOS. Se avete 
già una certa conoscenza dei comandi DOS per la gestione dei file troverete 
sicuramente utile la tabella 10-1; essa elenca gli enunciati di QBasic con i 
correlati comandi di DOS e con una descrizione della loro funzione. 
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Tabella 10-1. Enunciati di QBasic e comandi DOS equivalenti 


Enunciato Equivalente DOS Descrizione 


di QBasic 

FILES DIRAN Mostra il contenuto di una directory 
SHELL COMMAND Esegue un comando di DOS 
NAME RENAME Cambia il nome di un file 

KILL DEL o ERASE Cancella un file 

MKDIR MKDIR Crea una directory 

CHDIR CHDIR Cambia la directory corrente 
RMDIR RMDIR Rimuove una directory vuota 
L’enunciato FILES 


Per far in modo che il programma mostri un elenco di file tra cui l’utente può 
scegliere si usa l’enunciato FILES, che presenta la seguente sintassi: 


FILES [nomefile] 


nomefile è 11 nome facoltativo del file che si desidera vedere nella direc- 
tory che lo contiene; se non viene specificato, QBasic mostra un elenco di tut- 
ti 1 file presenti nella directory corrente. I caratteri jolly * e ? possono essere 
usati all’interno di nomefile per visualizzare gruppi di file più ampi. Per vede- 
re file contenuti in un’unità disco o directory diversa da quella corrente biso- 
gna includere in nomefile la lettera che indica l’unità disco o il percorso 
(path) della directory desiderata. 


Esercizio: Visualizzazione della directory corrente 


Il programma MOSTRA.BAS (figura 10-10) mostra come usare il comando 
FILES per visualizzare tutti i file con estensione .TXT contenuti nella direc- 
tory corrente. Dopo aver visualizzato l’elenco dei file MOSTRA.BAS, chiede 
all’utente di specificare il nome di un file e lo stampa. 

Scrivete ed eseguite il programma MOSTRA.BAS. 
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L’enunciato SHELL 


L’enunciato SHELL permette di uscire temporaneamente da QBasic per ese- 
guire dei comandi DOS; è utile quando si vuole eseguire un comando non di- 
sponibile in QBasic o quando si vuole dare all’utente accesso al DOS in fase 
di esecuzione di un programma (questa funzionalità si trova in molti pro- 
grammi presenti oggi sul mercato). 

In Microsoft Windows, per esempio, basta selezionare l’icona del DOS 
per entrarvi temporaneamente. 

L’enunciato SHELL presenta questa sintassi: 


SHELL [comandoStringa] 


re un File di dati 


comandoStringa è un valore o una variabile stringa facoltativa che con- 
tiene un comando DOS; se questo argomento viene incluso DOS esegue il 
comando e ritorna nel programma in QBasic; in caso contrario, si può dire 
che DOS esegua temporaneamente una copia di se stesso, copia che funziona 
esattamente come quella principale e in cui si può eseguire un qualsiasi nu- 
mero di comandi. Tuttavia la copia è soltanto temporanea; basta infatti digita- 
re exit e premere Invio per ritornare nel programma in QBasic. 


Esercizio: Esecuzione di un comando di DOS 


Il programma RUNDOS.BAS (figura 10-11) mostra come usare l’enunciato 
SHELL per eseguire dei comandi DOS dall’interno di un programma in QBa- 
sic. Per aiutarvi a distinguere ciò che il programma e il DOS visualizzano, il 
programma imposta un colore di fondo azzurro. In questo modo i risultati de- 
gli enunciati di QBasic appariranno in questo colore e i risultati del DOS ap- 
pariranno nel colore bianco predefinito. 


Figura 10-10. Un programma che mostra l’uso dell’ enunciato FILES. 


AI momento dell’esecuzione otterrete un risultato simile a questo: 
1. Scrivete edeseguite il programma RUNDOS.BAS 


La directory corrente contiene i seguenti file con estensione .TXT: QBasic mostrerà la seguente richiesta: 


C:\DOS Inserite un comando DOS [premete Invio per eseguirlo]: 
AUTODATI.TXT FRUTTA.TXT = MONETE.TXT AMICI.TXT DIARIO.TXT 
2080768 Bytes liberi 2. Per vedere come l’enunciato SHELL gestisce un comando DOS provate 


a digitare chkdsk e premete Invio. Dopo qualche momento il DOS mostra 


Quale file desiderate aprire? frutta.txt delle informazioni simili a queste: 


siii FRUTTA. TXT---------- Volume LORENZO creato 05-02-1990 4:36p 
i 11 numero di serie del volume è 1810-1496 

Frutta: Pera Casse: 10 Prezzo/Chilo: L5.300 

Frutta: Ciliege Casse: 2 Prezzo/Chilo: L10.000 

Frutta: Melone Casse: 14  Prezzo/Chilo: L9.500 
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- RUNDOS. BASIC 


i. programma esegue un Comando | DOS 


co a 3 - ‘imposta. it ._- azzurro. 


“riceve un ‘comando DOS dall ‘u afente _ 4 
Wen un ‘comando Dos Tpremete Invio per eseguirlo] 


Figura 10-11. Un programma che mostra l’uso dell’ enunciato SHELL. 
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21690368 byte totali su disco 
77824 byte in 6 file nascosti 
120832 byte in 54 directory 
19410944 byte in 1003 file utente 
2080768 byte disponibili su disco 


2048 byte in ogni unità di allocazione 
10591 unità di allocazione totali su disco 
1016 unità di allocazione disponibili su disco 


655360 byte di memoria totale 
361888 byte liberi 


Comando DOS completato 


L’enunciato SHELL elabora il comando CHKDSK del DOS e poi torna 
nel programma. 


Eseguite il programma di nuovo premendo Invio senza specificare alcun 
comando (eseguendo perciò una versione temporanea di DOS). Avrete 


un risultato simile a questo (notate il modo usato per copiare un file in 
DOS): 
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Inserite un comando DOS [premete Invio per eseguirlo]: 


Microsoft (R) MS-DOS(R) Versione 5.00 
(C)Copyright Microsoft Corp 1981-1991. 


C:\DO0S>dir *.txt 
Il volume nell'unità C è LORENZO 


Il numero di serie del volume è 1810-1496 
Directory di C:\DOS 


AUTODATI.TXT 107 06-06-91 12:40p 

FRUTTA.TXT 177 06-06-91 13:56p 

MONETE. TXT 197 06-06-91 15:34p 

AMICI.TXT 37 06-07-91 10:19a 

DIARIO.TXT 713. 06-07-91 13:12p 
5 file 1231 byte 


2080768 byte liberi 


C:\D0S>copy diario.txt a: 
1 File copiato 


C:\DOS>exit 


Comando DOS completato 


L’enunciato NAME 


L’enunciato NAME è utile quando si vuole rinominare un file o spostarlo da 
una directory a un’altra. La sintassi dell’enunciato NAME è la seguente: 


NAME vecchioNomeFile AS nuovoNomeFile 


vecchioNomeFile è il nome attuale del file e nuovoNomeFile è il nome 
che gli si vuole attribuire; in entrambi questi argomenti si può definire un per- 
corso di directory; se i due percorsi sono diversi, QBasic sposta il file nella 
directory specificata da nuovoNomeFile. Questo enunciato non consente di 
spostare file tra unità disco diverse. Se, per qualche ragione, NAME non rie- 
sce a rinominare i file, il programma genera un messaggio di errore. 
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i 28 Esercizio: Rinominare un file 
Il programma RINOMINA.BAS (figura 10-12) mostra l’uso dell’enunciato . 


NAME per cambiare il nome di un file nell’unità corrente. Notate l’uso del- 
I enunciato FILES che mostra i file contenuti della directory corrente. 
Scrivete ed eseguite il programma RINOMINA.BAS. 


| RINONTIA.BAS 


Peri - ri riceve uu ‘nome ... e .. NUOVO. 
UT Li vuoi rinominare?” n, vecchicimeS 


Figura 10-13. Un programma che mostra l’uso dell’ enunciato NAME. 
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Il risultato ottenuto dall’esecuzione del programma sarà simile a questo: 


La directory corrente contiene i seguenti file: 


C:\DOS 

<DIR> .. <DIR> FRUTTA.BAS AUTODATI.BAS 
AUTODATI. TXT FRUTTA.TXT MONETE.BAS MONETE. TXT 
MONETEZ.BAS AMICI.BAS AMICI.TXT DIARIO.BAS 
MOSTRA. BAS RINOMINA.BAS DIARIO.BAS RUNDOS. BAS 


2080013 Byte liberi 


Quale file vuoi rinominare? diario.txt 
Qual è il nuovo nome del file? libro.txt 


DIARIO.TXT rinominato con successo 


L’enunciato KILL 


L’enunciato KILL ha un significato diretto e definitivo: cancella un file dal 
disco. Quando un file è stato cancellato con l’enunciato KILL non può più es- 
sere recuperato. I programmatori usano quest’enunciato generalmente per 
cancellare file temporanei creati durante l’esecuzione del programma, ma può 
essere usato anche per funzioni di pulizia del disco. La sintassi dell’enunciato 
KILL è la seguente: 


KILL nomefile 


nomefile è il nome del file che dev’essere cancellato. Con questo enun- 
ciato si possono dare indicazioni sull’unità, il percorso e si possono anche 
usare i caratteri jolly ? e *. 


NOTA: L’enunciato KILL va usato con estrema cautela, 
specialmente se si impiegano dei caratteri jolly; si corre 
infatti il rischio di cancellare file che non si volevano 
cancellare. L'esercizio che segue mostra alcune misure di sicurezza 
che possono essere inserite in un programma che usa l’enunciato 
KILL. 


295 


2 Esercizio: Cancellazione di un file 


IL LIBRO DEL QBASIC MS-DOS 


È KILL. BAS A. @066 
a Questo. programma permette di cancellare | un file nella dire tory _ 
| corrente Li Li v_éè LL ___ùÒk 
"CLS. z__.+- “_X-_;____ ..1. 
SRL: "La directory corrente contiene Li seguenti. file: e 
PRINT. Li _à 

FILES * ne el | mostra. î file nell. directory corrente. 

PRINT . riceve iL file da cancellare - I 
INPUT "Quale(i) file desideri ‘cancellare? i nomefiteS _ 


| controlla 1 ‘esistenza di caratteri joy lo e 4) in nomerite$ 
_ Se vene sono, mostra un messaggio. di ‘avvertimento. 


i -— non ve ne sono, se con da cancellazione 


.. 2 PRINT “Attenzione: “car o: 

LL/_yYJ}{ filet" s._... 

____ UR i e) L 
Ru 


uu IF: - 
ELSE 


sin caso o Contrario esce dal | programma | 


| CILE omette * se non ci sono ) caratteri. dolly, cancella. i file 
» i UEASES (one 185) * canettato(ì) dal sistemi 


Figura 10-14. Un programma che mostra l’uso dell’enunciato KILL. 
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Il programma KILL.BAS (figura 10-14) si serve dell’enunciato KILL per - 
cancellare un file. Se l’utente include un carattere jolly nell’argomento nome- 
file il programma lo rileva per mezzo della funzione INSTR e visualizza un 
avvertimento in colore rosso che chiede all’utente di confermare l’azione che 
sta per essere eseguita. Se il file specificato non esiste, l’enunciato KILL ge- 
nera un messaggio di errore. 

Scrivete ed eseguite il programma KILL.BAS 
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Il risultato ottenuto sarà simile a questo: 


La directory corrente contiene i seguenti file: 


C:\DOS 

<DIR> .. <DIR> FRUTTA.BAS AUTODATI.BAS 
AUTODATI.TXT FRUTTA.TXT MONETE.BAS MONETE. TXT 
MONETE2.BAS AMICI.BAS AMICI.TXT DIARIO.BAS 
MOSTRA. BAS RINOMINA.BAS DIARIO.BAS RUNDOS . BAS 


2080013 Byte liberi 
Quale(i) file desideri cancellare? DIARIO.TXT 


DIARIO.TXT cancellato(i) dal sistema 


CREAZIONE DI UN DATABASE 
CON FILE SEQUENZIALI 


Concludiamo questo capitolo con uno sguardo a un semplice programma di 
database, MUSICDB.BAS, che usa molte delle enunciati e delle funzioni vi- 
ste per lavorare con informazioni conservate in un file sequenziale. MU- 
SICDB.BAS registra le seguenti informazioni per ogni disco, cassetta e 
compact disc della vostra collezione: 


8 Titolo 

8 Artista 

8 Annodi pubblicazione sul mercato 
8 Stile (rock, blues, jazz, classica, etc.) 


BI Supporto (disco, cassetta, CD) 


MUSICDB.BAS fornisce anche un numero di funzioni che caratterizzano 
lo “stile del database” e che aiutano a controllare al meglio i dati. MU- 
SICDB.BAS permette infatti di: 


& Archiviare in modo permanente informazioni sulla collezione in un file 
sequenziale. 


8 Esaminareiregistri del database uno alla volta sullo schermo. 
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Stampare l’intero database della collezione di musica. 
Cercare un registro per titolo o artista. 


Caricare ed esaminare altri database su collezioni di musica. 


Uscire temporaneamente in DOS per eseguirne un comando. 


Buona parte del codice di MUSICDB.BAS è dedicato alla creazione di 
una interfaccia basata su menu per darvi un’idea di come vengono create le 
schermate di applicativi di funzionalità generale. In questo senso MU- 


SICDB.BAS è abbastanza generico da poter essere facilmente modificato per 
la raccolta di altri tipi di informazioni. 
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Un primo sguardo a MUSICDB.BAS 


Prima di scrivere il programma MUSICDB.BAS cerchiamo di capire cosa 
può fare il nostro programma. 
Sullo schermo appariranno gli elementi di seguito riportati. 


sw Nomedel file corrente è il nome del file di database musicale attualmente 
aperto (MUSIC.DB è il file predefinito). 


ss  Modalitàcorrenteè il compito attualmente in esecuzione; questo indica- 
tore cambia quando cambiano i compiti eseguiti. 


3 Ora corrente è l’ora segnata dall’orologio di sistema (GEgIOmata ogni 
volta che il menu principale viene visualizzato). 


m Menuprincipale contiene le sette diverse funzioni che il programma può 
svolgere; questo è il menu principale che ricompare terminata l’esecuzio- 
ne di ogni compito. 


sw  Lineadistato contiene istruzioni e informazioni sulla selezione di menu 
attiva. 


Prendiamo ora in esame le funzioni contenute nel menu principale per ca- 
pire come possono essere usate. 


. L’opzione AGGIUNGI 


L’opzione Aggiungi serve ad aggiungere elementi al database. Per seleziona- 
re Aggiungi basta digitare 1 e premere Invio; MUSICDB cambia la modalità 
corrente in AGGIUNGI e richiede le informazioni sulla vostra collezione. La 
finestra di immissione dovrebbe apparire più o meno in questo modo: 


Titolo: Lo Schiaccianoci 

Artista: Orchestra Filarmonica di Vienna 
Anno di pubblicazione: 1982 

Stile musicale: Classica 

Supporto: Disco 


Titolo: Polka norvegese 

Artista: Gruppo di polka norvegese 
Anno di rilascio: 1953 

Stile musicale: Polka 

Supporto: Disco 
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Titolo: Memorie del passato 
Artista: I ricordi 

Anno di rilascio: 1964 
Stile musicale: Popolare 
Supporto: Cassetta 


Titolo: Hurried honeymoon 
Artista: The Magees 

Anno di rilascio: 1988 
Stile musicale: Country 
Supporto: Compact disc 


Titolo: L'anello dei Nibelunghi 

Artista: Orchestra filarmonica di Vienna 
Anno di rilascio: 1985 

Stile musicale: Classica 

Supporto: Cassetta 


Titolo: FINE 


Se inserite un certo numero di elementi la finestra inferiore scorre, men- 
tre restano al loro posto la parte inferiore e superiore (grazie all’enunciato 
VIEW PRINT). Quando digitate FINE il programma trasferisce le informa- 
zioni in un file sequenziale su disco e ritorna al menu principale. 


L’opzione MOSTRA 


L'opzione MOSTRA permette di esaminare il database un registro alla volta. 
Per selezionare MOSTRA basta digitare 2 e premere Invio. Se continuate a 
premere Invio incontrate il messaggio di raggiungimento della fine del file 
che indica che tutti i registri sono stati visualizzati. Notate che ogni registro 
appare sullo schermo esattamente come era stato inserito. Se premete ancora 
Invio tornate al menu principale. 


L’opzione PRINT 


L'opzione PRINT permette di stampare il database. Per selezionarla basta di- 
gitare 3 e premere Invio. Se avete una stampante collegata al sistema assicu- 
ratevi che sia accesa e pronta per la stampa e solo allora premete S per 
inviarvi i contenuti del file corrente. Se non avete una stampante collegata 
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non premete S altrimenti il programma comincia un’inutile ricerca della stam- 
pante; premete invece R per tornare al menu principale. 


L’opzione CERCA 


L’opzione CERCA permette di cercare un titolo o un artista specifico nel da- 
tabase. Per selezionare questa a opzione basta digitare 4 e premere Invio. Alla 
richiesta della categoria cercata digitate / per cercare un titolo 0 2 per cercare 
un artista. Osservate cosa accade se avete inserito i registri del nostro esem- 
pio e avete cercato le opere della Orchestra Filarmonica di Vienna. 

Due opere vengono visualizzate; notate che l’elemento cercato (in questo 
caso l’artista) viene evidenziato in verde. Completata la ricerca premete Invio 
per tornare al menu principale. 


L’opzione CAMBIA 


L’opzione CAMBIA permette di cambiare il nome di un file con cui si sta la- 
vorando rendendo possibile l’esame o la creazione di un altro database musi- 
cale (nello stesso formato). Per selezionare CAMBIA basta digitare 5 e 
premere Invio. Per permettere di vedere i file disponibili, CAMBIA mostra il 
contenuto della directory corrente prima di chiedere il nome del nuovo file. 
Anche in questo caso è possibile includere un’unità o un percorso particolare, 
ma se il nome di file indicato non è valido il programma viene interrotto. Se 
si preme Invio senza specificare un nuovo nome di file, il programma selezio- 
na il database predefinito, MUSIC.DB. 


NOTA: Col comando CAMBIA specificate solo dei file di 
database musicali (nuovi o esistenti); non indicate dei fi- 
le di documenti o di programmi di altre applicazioni 
(quali quelli con estensione .BAS, .BAT o .DOC) perché potreste 
danneggiarli. 


L’opzione ESCI 


L’opzione ESCI permette di uscire temporaneamente in DOS per eseguire dei 
comandi o piccoli programmi (non avrete la possibilità di eseguire program- 
mi di grosse dimensioni perché QBasic e MUSICDB continuano a essere pre- 
senti in memoria). Per selezionare questa opzione si digita 6 e poi si preme 
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Invio. Dopo aver eseguito i comandi di DOS desiderati basta digitare exit e 
premere Invio per tornare nel menu principale di DOS. 


L’opzione FINE 


L'opzione FINE permette di uscire dal programma e tornare in QBasic; per 
selezionare questa opzione basta digitare 7 e premere Invio. 


Il listato del programma MUSICDB.BAS 


Dopo aver visto come funziona il programma, diamo un’occhiata al listato 
per vedere come vengono usati gli enunciati e le funzioni appresi fino a que- 
sto momento. MUSICDB.BAS (figura 10-14) consiste di un programma prin- 
cipale e di sette sottoprogrammi; ciascuno di questi, anche se gestisce un 
compito specifico, è disegnato per essere una routine di carattere generale co- 
sì da poter essere usata in programmi di database di altro genere. 

Alcuni degli elementi nel listato sono evidenziati in nero per indicare i 
punti in cui il programma dev'essere modificato se si decide di adattare il da- 
tabase per registrare altri tipi di informazioni. 

Esaminate il listato leggendo i commenti di spiegazione; potrete notare le 
parti di ogni sottoprogramma che sono indipendenti dal tipo di dati con cui si 
lavora: la scelta di un elemento dal menu principale, l’elaborazione della sele- 
zione effettuata, l’apertura e la chiusura dei file, la lettura, la stampa e la ri- 


cerca degli oggetti. Ciò significa che per modificare il programma e adattarlo. 


ad altri tipi di database (raccolta di monete, registro dei dipendenti etc.) basta 
rimuovere i campi e le richieste di input specifici, sostituendoli con campi e 
richieste appropriate al nuovo database. L’aspetto della finestra cambierà, ma 
la struttura interna rimarrà invariata. 


Esercizio: Creazione del programma per la collezione musicale 


Scrivete ed eseguite il programma MUSICDB.BAS. Notate che la figura 10- 
15 mostra il programma come apparirebbe se venisse stampato e non come 
compare all’interno di QBasic. Per scrivere questo programma dovete usare il 
comando Nuovo SUB dal menu Modifica per inserire ciascun sottoprogram- 
ma in una finestra separata (per maggiori informazioni su questa procedura si 
veda il capitolo 7). 


302 


Capitolo 10 - Lavorare con i file 


‘© MUSICDB. BAS n. 000 
i Questo. é un semplice. programma di St. che vegistra una .° 
di dati relativi. a una collezione di ce musicali. i (dischi, cassette 
ecc. ) .- __.}: - i 


con un fite sequenziale è e ur 


_- SUB MostraIntestaz. o ! dichi 
| DECLARE SUB SelezioneDiMeny (sceltat) | 
| DECLARE SUB AggiungiRegistri. i) 
Le SUB ta i) 


- tnps = "Anno: 


v._- ‘richiama. è 11 sottoprogranma c che ‘imposta do .. 


"LOCATE 3, vi PRINT. "CERCA | Li ' cambia la ‘modalità în CERCA 


Figura 10-14. MUSICDB.BAS, programma database che utilizza un file sequenziale 
per generare un elenco dei pezzi musicali. Modificare le voci in neret- 
to quando il programma verrà adattato a un altro tipo di database 
(continua). 
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i. i -Richiama. il sottoprogramma | per la ricerca di elementi. . 
CASE pi “or significa cambia il. nome, del file. - _.o—o\i 
LOCATE 3, 47: PRINT “CAMBIA ' *- ' cambia. Ta. modalità in | CAMB: i 
Cambi aNomeFile ‘ richiama il sottoprogranma dal cambiare nome — 


_ trasferisce 37 registri 0 file del database . 
WRITE tl. titoli, cui ua supporto 


ca 


_. Ln file quando si è terminat, 


Figura 10-14. MUS/CDB.BAS, programma database che utilizza un file sequenziale Figura 10-14. MUSICDB.BAS, programma database che utilizza un file sequenziale 
per generare un elenco dei pezzi musicali. Modificare le voci in neret- per generare un elenco dei pezzi musicali. Modificare le voci in neret- 
to quando il programma verrà adattato a un altro tipo di database to quando il programma verrà adattato a un altro tipo di database 
(continua). (continua). 
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omefile$ FOR. APPEND AS n' capre. e . il File per. assicurarsi. o 
‘che sia presente nel disco (questo. per evitare. - 
rori d apertura. in en 


Figura 10-14. MUSICDB.BAS, programma database che utilizza un file sequenziale Figura 10-14. MUSICDB.BAS, progr ni -- ona di i 
per generare un elenco dei pezzi musicali. Modificare le voci in neret- DO no L dattato ; un altro tipo di database 
to quando il programma verrà adattato a un altro tipo di database to quando il programma verrà ada 
(continua). bi (continua). 
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INPUT; Digitate s per stampare c o R per tornare ali menu. principale: ",. n 
risposta$ i _° 
VIEW PRINT 5 TO 23 - attiva i finestra di testo righe. 5 ci 
1 e l'utente vuole stampare. (Sos) i 

i. OR R (risposta$. 


i tam Gut 


Figura 10-14. MUSICDB.BAS, programma database che utilizza un file sequenziale Figura 10-14. MUSICDB.BAS, progr UNA database che - aa di da sana 
per generare un elenco dei pezzi musicali. Modificare le voci in neret- per generare un elenco dei pezzi musicali. Mo dn i... 
to quando il programma verrà adattato a un altro tipo di database to quando il programma verrà adattato a un altro tp 
(continua). (continua). 
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Figura 10-14. MUSICDB.BAS, programma database che utilizza un file sequenziale 
per generare un elenco dei pezzi musicali. Modificare le voci in neret- 


to quando il programma verrà adattato a un altro tipo di database 
(continua). 
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Figura 10-14. MUSICDB.BAS, programma database che utilizza un file sequenziale 
per generare un elenco dei pezzi musicali. Modificare le voci in neret- 
to quando il programma verrà adattato a un altro tipo di database. 


SOMMARIO 


In questo capitolo abbiamo iniziato a riunire alcune delle tecniche sviluppate 
fino ad ora; abbiamo lavorato con grandi quantità di dati, vedendo come si 
leggono e si scrivono file sequenziali. Abbiamo anche esaminato quale ruolo 
il DOS e i suoi comandi giocano nella programmazione in QBasic e abbiamo 
usato molti di questi comandi direttamente. Inoltre abbiamo creato un pro- 
gramma di database per registrare i dati di una collezione di supporti musicali 
che combina le tecniche per la gestione delle stringhe e dell’interfaccia uten- 
te, viste nei capitoli precedenti, con quelle di gestione di file sequenziali, viste 
in questo capitolo; il risultato è un database di carattere generale che può es- 
sere usato per registrare informazioni di qualunque genere. 


DOMANDE ED ESERCIZI 


1. Quale differenza c’è tra l’apertura di un file in modalità OUTPUT e in 
modalità APPEND? 


2. Quale dei seguenti enunciati racchiude le informazioni tra virgolette 
quando le invia a un file sequenziale? 
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a. INPUT# 

b. PRINT# USING 
c. PRINT# 

d. WRITE# 


Vero o Falso: il nome di file specificato in un’enunciato OPEN dev’esse- 
re in maiuscolo. 


Quando si può dire che l’enunciato LINE INPUT# sia più utile dell’e- 
nunciato INPUT#? 


Che errore c’è in quest’enunciato di QBasic? 
SHELL COPY TEST.TXT TEST2.TXT 
Che cosa mostrano queste righe di programma? 


cercaStr$ = "Yellow Submarine" 

artista$ = "The Beatles" 

IF INSTR(UCASE$(artista$), UCASE$ (cercaStr$)) THEN 
PRINT "Stringa trovata!" 

ELSE 
PRINT "Stringa non trovata" 

END IF 


Scrivete un programma che richiede all’utente un elenco di città e le ar- 
chivia in un file sequenziale. Progettate il programma in modo che l’u- 
tente possa vedere i contenuti del file dopo averlo creato. 


Scrivete un programma che richiede all’utente un elenco di nomi e indi- 
rizzi, li archivia in un file sequenziale e poi ordina i registri alfabetica- 
mente per nome, in un file a parte. Suggerimento: il modo più semplice 
per risolvere questo problema è quello di usare una matrice per conserva- 
re e ordinare i registri. Vi consigliamo di usare il sottoprogramma Shell 
Sort visto nel capitolo 9. 
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Dopo aver visto i fondamenti di QBasic possiamo analizzare come è possibile 
migliorare i programmi aggiungendo grafica e suoni. In questo capitolo ve- 
dremo quali tipi di grafica il vostro computer è in grado di creare e come è 
possibile usare il suono per vivacizzare i vostri programmi. 


INTRODUZIONE ALLA PROGRAMMAZIONE 
GRAFICA 


L’hardware determina il tipo di grafici che è possibile creare ed è perciò im- 
portante sapere che tipo di apparecchiatura video è installata sul computer. 


L’apparecchiatura video 


In un computer IBM compatibile l’apparecchiatura video è composta da due 
elementi: 


Bi L’adattatore video, cioè la scheda elettronica installata dentro la macchi- 
na (Nota: nei computer IBM PS/2 o compatibili questo elemento è parte 
del computer, non è cioè una scheda aggiunta). 


Bi Ilmonitor(detto anche schermo). 


Alcune apparecchiature video sono in grado di visualizzare sia la grafica 
sia il colore, altre solo la grafica e altre ancora non sono in grado di mostrare 
né la grafica né il colore. Inoltre tra i sistemi in grado di mostrare sia la grafi- 
ca che il colore c’è un’ampia varietà di scelta. Generalmente meno costosa è 
l’apparecchiatura, meno colori saranno disponibili e più sgranata risulterà 
l’immagine; un’apparecchiatura video costosa è spesso in grado di visualizza- 
re molti colori e di produrre un’immagine molto più professionale. 


Adattatori video 


La tabella 11-1 elenca gli adattatori video disponibili per computer IBM PC, 
IBM PC/XT, IBM PC/AT e compatibili. 
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Tabella 11-1. Adattatori video per i computer PC IBM e compatibili. 


Adattatore Video Grafica 


multicolore 
MDA (monochrome display adapter) No No 
HGC (Hercules graphics card)* No Si 
CGA (color/graphics adapter) Si Si 
EGA (enhanced graphics adapter) Si Si 
MCGA (multicolor gate array) Si Si 
VGA (video graphics array) DI Si 


* La scheda grafica Hercules non è prodotta da IBM. Questa scheda viene spesso indicata come adattato- 
re monografico o adattatore grafico monocromatico. 
** Per avere più colori è necessario disporre di un monitor VGA. 


È possibile installare diversi tipi di adattatori video, ma la maggior parte sono 
compatibili con quelli elencati nella precedente tabella. Se il vostro computer 
dispone solo di una scheda MDA non sarete in grado di svolgere la maggior 
parte degli esercizi mostrati nel capitolo. Se non siete sicuri del tipo di adatta- 
tore di cui disponete proseguite con la lettura; fra un po’ vedremo un pro- 
gramma in grado di dirvi se potrete svolgere o meno gli esercizi successivi. 


Monitor 


Anche i monitor sono disponibili sul mercato in grande varietà (di tipi e di 
prezzi). Possiamo notare che, sebbene certi adattatori video funzionino con 
molti diversi tipi di monitor, tuttavia i produttori cercano generalmente di ab- 
binare l’adattatore col monitor più appropriato. 


Modalità testo e modalità grafica 


Tutti gli adattatori capaci di visualizzare grafica possono operare in modalità 
testo o in modalità grafica. 


e In modalitàtesto l’adattatore video può visualizzare caratteri alfanumeri- 
ci (lettere, numeri e segni di punteggiatura) ma non forme (righe, riqua- 
dri, cerchi etc.). 


3 In modalitàgrafical’adattatore video può visualizzare caratteri alfanume- 
rici ma anche forme non alfanumeriche, quali cerchi o poligoni. 


Cercheremo di analizzare queste due modalità in maggior dettaglio. 
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MODALITÀ TESTO 


All’avvio di QBasic l’adattatore video mostra sia la Finestra di digitazione , 
che lo schermo di output in modalità testo: 25 righe con 80 caratteri per riga. 


80 caratteri per riga 


25 righe 
di caratteri 


Ogni riga e colonna nello schermo di output è numerata e a ogni riquadro 


vengono attribuite delle coordinate uniche, dette coordinate dello schermo. 


Ognuna di queste caselle può contenere solo un carattere alfanumerico. 


Il cursore di testo 


Ricorderete che quando digitate un programma nella Finestra di digitazione il 
cursore lampeggiante indica dove apparirà il carattere successivo. Nello 
schermo di output QBasic usa il proprio cursore, detto anche cursore di testo, 
per determinare dove appariranno i caratteri. A differenza del cursore lam- 
peggiante della Finestra di digitazione, il cursore di testo è invisibile. 
L’enunciato CLS, che pulisce lo schermo, svolge in realtà anche un’altra 
funzione: serve a impostare il cursore di testo in corrispondenza della prima 
riga e della prima colonna dello schermo di output; quando QBasic esegue un 
enunciato PRINT dopo CLS, ne stampa il messaggio nella prima riga a parti- 
re dalla prima colonna. Supponiamo ora che PRINT non termini con un punto 
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Numeri colonna 


3 3 4 4 5 5 6 6 
0_5_ 0 5 0 5 0 5 


7.7 8 
0_S_ 0 


Numeri 
riga 


Carattere a riga 5, colonna 10 


e virgola, QBasic allora sposta il cursore di testo in corrispondenza della se- 
conda riga e della prima colonna. 


L’enunciato LOCATE 


È possibile modificare il posizionamento automatico del cursore di testo con 
l’enunciato LOCATE che permette di stabilire dove deve apparire il cursore 
di testo all’interno di un programma. 

L’enunciato LOCATE presenta la seguente sintassi: 


LOCATE [riga][, colonna] 
riga è un intero da 1 a 25; colonna è un intero da 1 a 80. 


1 Se omettetel’indicazione riga il cursore di testo rimane in corrisponden- 
za della riga corrente. 


Bi Se omettete l’indicazione colonna il cursore di testo rimane in corrispon- 
denza della colonna corrente. 


Bi Se omettete entrambe le indicazioni QBasic lascia il cursore di testo nella 
posizione corrente. 


8 Se per rigao colonna specificate un valore al di fuori delle dimensioni 
dello schermo, otterrete un messaggio di errore. 
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NOTA: Come vedremo fra poco, è possibile far in modo 
che l'adattatore video mostri solo 40 colonne. In questo 
caso la colonna non può avere un valore maggiore di 40. 


da Esercizio: Uso del’enunciato LOCATE 


1. Scrivete il programma LOCATE-1.BAS (figura 11-1). 


Nell'esempio che segue, LOCATE indica a QBasic di posizionare il cur- 
sore alla riga 10 e alla colonna 46. Quando QBasic esegue il successivo enun- 
ciato PRINT stampa il messaggio Benvenuto! iniziando dalla riga 10 e dalla 
colonna 46. Dopo aver stampato il messaggio, QBasic posiziona il cursore al- 
la riga 11 e alla colonna 1 e stampa il messaggio dell’enunciato PRINT suc- 


cessivo cominciando in quel punto, a meno che vi sia un altro enunciato 
LOCATE che cambia la posizione. 


Posiziona il cursore alla riga 10, colonna 46. 
LOCATE 10, 46 


PRINT "Benvenuto!" \ 


Stampa il messaggio a partire dalla riga 10, colonna 46. 


A i i i i pi (LI 
ai 


Figura 11-1. Un programma che mostra l’uso dell’ enunciato LOCATE. 


2. Eseguite il programma e specificate valori di riga e colonna maggiori di 2 
(ne capirete fra poco la ragione). Dopo aver eseguito il programma lo 
schermo di output dovrebbe essere simile alla figura di pagina seguente. 

Notate che il programma stampa i numeri nella riga 1 e nelle colonne 1 e 

2; questo vi permette di verificare facilmente che il messaggio cominci 

effettivamente alle coordinate specificate. 

L'esempio della figura impiega un valore di riga pari a 5, un valore di co- 


lonna pari a 20 e stampa il messaggio Sa/ve/ Eseguite il programma un 
QBasic sposta il cursore del testo alla riga 11, : paio di volte per capire meglio come funziona l’enunciato LOCATE. 
colonna 1 dopo aver visualizzato il messaggio 


ERI 
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1234567990123456799012345678901234567899123456729012345678901234567890912345675998 


19 CO AU 


Premere un tasto per continuare 


320 


Provate ora a eseguire il programma indicando un valore alto di colonna 
e usando un messaggio abbastanza lungo. Per esempio provate con riga 
5, colonna 70 e col messaggio Dove comparirà questo messaggio? Lo 
schermo di output dovrebbe apparire in modo simile a quello della figura 
qui riportata. 


i 
i 
i 
3 
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1234565 7?8991234567?8901234567890123456789912345678901234567890123456789012345678990 


Premere un tasto per continuare 


Notate che QBasic mostra il messaggio cominciando dalla riga 6 e dalla 
colonna 1, anche se avevate indicato la riga 5. Poiché il messaggio supera 
il limite degli 80 caratteri, QBasic sa che non può stare interamente nella 
riga 5 e perciò lo fa cominciare dalla riga successiva. Tenete presente 
questo comportamento di QBasic quando usate LOCATE e agite di con- 
seguenza. 

Come potete vedere il programma chiede di indicare un valore di riga da 
1a23elerighe sullo schermo sono numerate fino a 23. Prima avevamo 
però detto il valore di riga può andare da 1 a 25. Perché abbiamo limitato 
il programma a 23 righe? 


Eseguite il programma di nuovo e indicate 24 come valore di riga. Il vo- 
stro schermo di output apparirà come nella figura riportata a pagina se- 
guente. 

Dopo aver stampato il messaggio, QBasic ha spostato il cursore nella pri- 
ma colonna della riga successiva; per farlo ha dovuto spostare di una riga 
verso l’alto i contenuti dello schermo facendo scomparire il contenuto 
della prima riga. 

Potete risolvere questo problema aggiungendo un punto e virgola alla fi- 
ne dell’enunciato PRINT, tendendo così il cursore nella stessa riga. Gli 
enunciati che seguono, per esempio, visualizzano il messaggio Questa è 
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Cosa accadrà? 


Fremere un tasto per continuare 


la riga 24 sulla riga 24 senza spostare verso l’alto i contenuti dello scher- 
mo: 


LOCATE 24, 1 
PRINT "Questa è la riga 24" 


Potete usare la stessa tecnica per posizionare del testo nella riga 25 (ab- 
biamo visto qualcosa del genere nel programma MUSICDB.BAS nel 
precedente capitolo). Ricordate in ogni caso che QBasic usa la riga 25 
per mostrare il messaggio Press any key to continue (Premere un tasto 
qualsiasi per continuare) per cui i caratteri collocati su questa riga verran- 
no sovrascritti. 


Uso di LOCATE per creare animazioni 


L’enunciato LOCATE è utile anche per creare semplici animazioni (dando 
cioè all’utente /’illusione del movimento sullo schermo). Un modo per far ciò 
è quello di visualizzare un carattere ripetutamente nella direzione del movi- 
mento, sostituendo di volta in volta il carattere precedente con uno spazio, co- 
me si vede nella figura 11-2. Così facendo, si ottiene l’illusione del 
movimento. 
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2. Stampa lo stesso carattere nella posizione adiacente 
| | 


3. Stampa uno spazio in corrispondenza al primo carattere 


Figura 11-2. Animazione di un carattere sullo schermo. 


de Esercizio: Animazioni basate sul testo 
Supponiamo di voler scrivere un programma che sposta. la lettera X at- 
traverso lo schermo. 


1. Scrivete ed eseguite il programma LOCATE-2.BAS (figura 11-3). 


Figura 11-3. // primo passo nell’ animazione di un carattere. 
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2. Eseguite il programma; apparirà una serie di X nella riga 10 del vostro stamparlo alla riga 10 e alla colonna 0. Poiché 0 non è un valore valido 
schermo. Anche se ciò non dà l’illusione del movimento rappresenta però QBasic si interromperebbe e mostrerebbe un messaggio di errore. 
il primo passo per “animare” un carattere. Siccome QBasic esegue il pro- . ” i 
gramma velocemente le X vengono stampate quasi simultaneamente, ma 4. Eseguite il programma e notate come questo dia effettivamente l’impres- 
si possono usare le tecniche viste nel capitolo 6 per ritardare il loop nel 23905 che la lettera X si “sposti” attraverso lo schermo. Se volete, ferma- 
programma, rallentando la velocità con cui QBasic stampa le X (il prossi- levi a:duesto punto,e fate delle PIOVE:S0n il PIOSIStona, VI ACFUIECICIO 
mo programma include un ritardo nel loop; prima di leggere questo che inserire questo tipo di animazione nei vostri programmi può davvero 
esempio cercate di scriverne uno da soli). ‘catturare’ l’attenzione dell'utente. 


Il passo successivo è quello di creare l’illusione che una sola lettera X si 
sposti sullo schermo, anche se il programma stamperà in realtà ottanta X 


i Animazione verticale 
separate. Dunque il programma deve stampare un X, stamparne una se- 


conda immediatamente alla destra della prima e poi cancellare la prima Ora che avete imparato i principi fondamentali dell’animazione del testo, pro- 
X, inserendo uno spazio al suo posto. viamo qualcosa di più divertente: delle parole che scendono dal cielo. 
3. Scrivete ed eseguite il programma LOCATE-3.BAS (figura 11-4). a Esercizio: Il programm a CADUTA.BAS 
Scrivete ed eseguite il programma CADUTA.BAS (figura 11-5). 


Figura 11-4. Un programma che anima un carattere. 


Figura 11-5. Un programma che mostra l’ animazione verticale. 


Notate che la prima X viene stampata prima che il loop inizi. La ragione 

va trovata nel modo in cui le X vengono cancellate. I valori di LOCATE 

per la stampa sono 10, i% e —/; se il loop iniziasse col valore /, il pro- Invece di stampare solo una lettera, come nell’esempio precedente, que- 

gramma non riuscirebbe a stampare il primo spazio perché dovrebbe sto programma stampa un’intera parola e per “cancellare” quella precedente 
usa una stringa di spazi. 
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Inoltre questo programma usa il suono per rafforzare l’impressione della 
caduta di ciascuna parola. Si noti che l’enunciato SOUND usa il valore cor- 
rente di riga% come divisore di 2400. Come risultato si avrà che all’aumenta- 
re del valore di riga% il risultato della divisione diminuisce, riducendo la 
tonalità (analizzeremo l’enunciato SOUND in maggior dettaglio più avanti in 
questo capitolo). 


MODALITÀ GRAFICA 


Come abbiamo visto la modalità testo è un modo interessante e relativamente 
diretto di presentare informazioni sullo schermo; si possono infatti aggiunge- 
re “grafici” basati sul testo e semplici animazioni senza grossi sforzi di pro- 
grammazione. 

Tuttavia la programmazione basata sul testo presenta dei limiti. Innanzi- 
tutto anche il più piccolo carattere (per esempio un punto) copre un’intera ca- 
sella, con la conseguenza che diventa difficile se non impossibile creare 
grafici ben definiti. Inoltre, l’animazione basata sul testo non viene visualiz- 
zata in modo continuo perché l’oggetto animato deve sempre saltare di casel- 
la in casella ogni volta che il programma lo sposta. 

Perciò se si vogliono ottenere forme definite o animazioni senza “salti” è 
consigliabile disporre di un adattatore video che supporta la modalità grafica 
e usare gli strumenti grafici che QBasic è in grado di offrire. 


Cos'è la modalità grafica? 


Se guardate attentamente i caratteri sullo schermo noterete che questi sono 
costituiti di punti piccolissimi che, messi insieme, formano una lettera; infatti 
ciascuna delle caselle viste in precedenza è sostanzialmente una matrice di 8 
per 8 punti, come mostrato nella figura seguente. 

Nella figura si vede come la matrice di punti viene riempita per formare 
la lettera A. Sebbene non tutti i punti vengano utilizzati, tutti i punti della ma- 
trice appaiono sullo schermo quando l’adattatore video si trova in modalità 
testo. E questa la ragione per cui un’intera casella è necessaria per ciascun 
carattere. 

In modalità grafica le regole cambiano perché è possibile avere accesso a 
tutti i singoli punti. 
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NOTA: Alcuni adattatori video possono visualizzare ma- 
trici di diverse dimensioni. Per esempio, alcuni possono 
visualizzare matrici di 8 punti in ampiezza e 9 in altezza; 
altri di 9 punti in ampiezza e 14 in altezza e così via. Per semplicità 
faremo riferimento sempre a matrici 8 per 8. 


Risoluzione grafica 


Nel campo della grafica basata su computer, la parola risoluzione viene defi- 
nita come finezza di dettaglio in un'immagine. In linea generale un'immagine 
a bassa risoluzione presenta un aspetto granulare mentre un'immagine ad alta 
risoluzione presenta un aspetto continuo, quasi fotografico (maggiore la riso- 
luzione, maggiore la qualità dell’immagine). Se osservate la foto di un gior- 
nale da vicino vi accorgerete che è fatta di migliaia di piccolissimi punti, non 
riconoscibili a distanza. 

Anche lo schermo di un computer (così come quello di una televisione) 
forma le immagini attraverso puntini piccolissimi. Più piccoli sono i punti 
(cioè maggiore è la risoluzione) migliore sarà la qualità delle immagini. 

Sullo schermo di un computer ogni punto viene detto pixel. A differenza 
dei punti che costituiscono la foto di un giornale (che possono avere dimen- 
sioni diverse per aree più chiare o più scure), tutti 1 pixel dello schermo di un 
computer hanno la stessa dimensione. 
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NOTA: Ricordate che è l'adattatore video e non il moni- 
tor che determina la risoluzione, così come è responsa- 
bile della visualizzazione di caratteri e figure sullo 
schermo. Perciò quando si parla di hardware e di funzionalità gra- 
fiche del computer si fa riferimento sostanzialmente all’ adattatore 
video. 


Per poter lavorare in modalità grafica è necessario impostare l'adattatore 
video su questa modalità. In QBasic ciò viene fatto con l’enunciato SCREEN. 


L’enunciato SCREEN 


L’enunciato SCREEN imposta l’adattatore video in modalità grafica al mo- 
mento della visualizzazione del risultato. La forma più semplice di quest’e- 
nunciato è la seguente: 


SCREEN mode 


mode è un numero da 0 a 13 (esclusi 5 e 6) che dice a QBasic in quale 
modalità grafica sì vuole impostare l’adattatore video. Sebbene vi siano 12 
modalità grafiche disponibili il vostro adattatore sarà in grado di usarne solo 
alcune e potrà operare in una sola modalità alla volta. 

Ogni modalità è unica per quanto riguarda la risoluzione e il numero di 
colori supportati. Alcune modalità possono visualizzare 25 righe e 80 colonne 
di testo; altre 25 righe e 40 colonne e altre ancora possono visualizzare anche 
più di 25 righe. 

La tabella 11-2 elenca le 14 modalità; le risoluzioni indicate rappresenta- 
no la massima risoluzione possibile per quella particolare modalità. I valori 
sono indicati nella forma orizzontale * verticale (perciò, 320*200 significa 
che lo schermo ha un’ampiezza pari a 320 pixel e un’altezza pari a 200). 

Anche il numero di colori rappresenta il massimo disponibile per quella 
particolare modalità. Si noti che alcuni adattatori potrebbero non essere in 
grado di visualizzare il numero massimo di colori per una data modalità, an- 
che se l’adattatore video la supporta. 

La risoluzione testo di ogni modalità indica la dimensione in cui il testo 
verrà visualizzato se si usa l’enunciato PRINT. Notate che la maggior parte 
delle modalità usa 25 righe; ciò che è più importante a questo punto è il nu- 
mero delle colonne di testo che una data modalità è in grado di visualizzare. 
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Tabella 11-2. Modalità schermo disponibili e loro risoluzioni 


Modalità Numero di Risoluzione 


schermo Risoluzione colori testo 
0 (solo testo) 16 80 * 25 
1 320 * 200 4 40 * 25 
2 640 * 200 2 80 * 25 
3* 720 * 348 1 80 * 25 
4** 640 * 400 1 80 * 25 
5 Non supportato 

6 Non supportato 

7 320 * 200 16 40 * 25 
8 640 * 200 16 80 * 25 
9 640 * 350 16 80 * 25 
10 640 * 350 de 80 * 25 
11 640 * 480 2 80 * 30 
12 640 * 480 16. 80 * 30 
13 320 * 200 256 40 * 25 


* Solo schede grafiche Hercules e compatibili. 

** Solo personal computer Olivetti e AT&T 6300. 

*** La modalità 10 visualizza diversi attributi invece di diversi colori. In altre parole le immagini vengo- 
no mostrate in una forma regolare, luminosa o lampeggiante invece che in colori diversi. 


Esercizio: Identificazione dell’adattatore del vostro computer 


Scrivete ed eseguite il programma TEST-VID.BAS (figura 11-6). Questo 
programma fornisce un elenco di impostazioni di modalità che possono esse- 
re usate con l’enunciato SCREEN. 


NOTA: Questo programma usa due nuove enunciati (ON 
ERROR GOTO e RESUME NEXT) per dire a QBasic 
cosa fare se incontra una modalità non supportata. 
Tranne che per questo esempio, ON ERROR GOTO e RESUME 
NEXT vanno al di là degli obiettivi di questo libro. Per ulteriori in- 
formazioni su questi due enunciati consultate la funzione di aiuto in 
linea di QBasic. 


Le coordinate della modalità grafica 


Con l’enunciato LOCATE, specificando le coordinate di riga e colonna, si 
può stabilire dove apparirà il testo sullo schermo di output. In modalità grafi- 
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uu TEST- VID. BAS z‘‘‘‘’’ . LL. Esaminiamo le coordinate della modalità 1 dello schermo. Come si vede 
‘* Questo programma determina quali modalità sono > supportate i-iìàÒ'’ °° dalla tabella 11-2 la modalità 1 ha una risoluzione grafica di 320*200 e una 
| dall adattatore video w_’0’ risoluzione di testo di 40*25, come mostrato nella figura seguente. 

- | Notate una prima importante differenza tra il sistema di coordinate grafi- 
che e di testo: il primo pixel in alto a sinistra sullo schermo grafico ha coordi- 
nate (0,0) mentre sullo schermo di testo ha coordinate (1,1). 

Un'altra importante differenza si ha nel modo in cui le coordinate vengo- 
no specificate: in modalità testo dovete indicare riga e colonna, in modalità 
grafica invece, colonna e riga. 

Si noti anche che in modalità grafica, come anche in modalità testo, ogni 
parte dello schermo ha coordinate uniche. 


320 colonne 


| Pixel 319,0| 


Jr o . 
| PRINT migliorModo& 


200 righe 


Pixel 0,199 Pixel 319,199 


Figura 11-6. Un programma che controlla l’ adattatore video. 


ca lo schermo di output presenta due tipi di coordinate a seconda del tipo di Lavorare con singoli pixel 


informazione che si vuole visualizzare: i i 1 i 
Dopo aver usato l’enunciato SCREEN per impostare l’adattatore video in 


L Coordinate di testo, che funzionano in modo equivalente sia in modalità modalità grafica si possono usare due enunciati di QBasic per collocare pixel 
grafica sia in modalità testo. | individuali in luoghi specifici sullo schermo: PSET e PRESET. 


Bi Coordinate di grafica che vengono usate per posizionare sullo schermo 
informazioni non testuali (come linee o cerchi). 
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L’enunciato PSET 
La sintassi dell’enunciato PSET, nella sua forma più semplice, è la seguente: 
PSET (coordinataX, coordinataY){[, colore] 


coordinataX è il numero della colonna in cui si vuole far apparire il pixel. 
L'intervallo di valori che si può usare dipende dalla modalità schermo impo- 
stata con l’enunciato SCREEN. Per esempio, se si sceglie la modalità 1, il va- 
lore di coordinataX è compreso tra 0 e 319 perché il numero massimo di 
colonne in questa modalità è 320. 

coordinataY è il numero della riga in cui si vuole far apparire il pixel. 
Anche in questo caso l’intervallo di valori dipende dalla modalità schermo 
impostata. Per esempio, se la modalità schermo è 1 il valore di coordinataY è 
compreso tra 0 e 199 perché il numero massimo di righe in questa modalità è 
200. 


NOTA: Le parentesi attorno ai valori delle coordinate 
non sono facoltative ma obbligatorie. 


colore è un valore che rappresenta il colore del pixel. Anche in questo ca- 
so i valori possibili dipendono dalla modalità schermo impostata; se si omette 
color QBasic mostra il pixel nel colore di sfondo corrente. 

Un enunciato PSET imposta solo un pixel alla volta, ma può essere posto 
all’interno di un loop per disegnare più pixel in una riga. 

Per cancellare un pixel disegnato con PSET basta porre le coordinate del 
pixel in un’altro enunciato PSET e specificare il colore dello sfondo come va- 
lore di colore. 


Esercizio: Uso dell’enunciato PSET 
1. Scrivete il programma PSET.BAS (figura 11-7). 


2. Eseguite il programma e specificate un valore compatibile col vostro 
adattatore video (ottenuto con l’esercizio precedente). Il programma co- 
mincerà a “spostare” un pixel con salti regolari sullo schermo; dopo aver 
collocato ogni pixel sullo schermo il programma aggiorna il messaggio in 
fondo allo schermo per mostrare le coordinate del pixel. 

Se col vostro adattatore avete a disposizione più di una modalità, provate 
a eseguire nuovamente il programma con una diversa modalità. Notate la 
diversa risoluzione (il programma coprirà quasi completamente di pixel 


394 


Capitolo 11 - Lavorare con grafica e suoni 


PSET. BASI “_Fr__... A 
- iu Programma mostra. \ uso dell’ enunciato PSET. 


aneuT Inserite 1: la modalità schermo. desiderata Ko 19): > "_ modoNum®& | ’ 
| SCREEN vr .. «____-.. __ 


"LOCATE 22, di 

| PRINT. "Col: - Ria i ____%.1 

P 20° valori per. i 

cn per Cioni 

Le S il colore di sfondo predefinito 

_ i 23, 1 ! posiziona. il cursore. di testo. ’‘.’ 
_uwu: si - Coordinate correnti: e uo "4% _ __ 


FOR a = i To 2000 "ritarda. il i 1000 
Li kg _ LL 0OOOÀÒ 


" da DI do usa Li colore dello sfondo per ‘cancellare 
__ 23, 22° . n. . 
PRIN ‘SPACE$ (13) i ‘cancella de coordinate stampate ìtnaàùaéùe:’)’”] ] 
NEXT. jo _. LL —ì0Ò0ìòàòàÀ@òÉ@RàÀàÀRqÀRÀÌÀDÀDRDQàQqpzpzpò0Q0ùàÙùòàÒàaà@@» 
NET uu» _—QQQÒÎÒO Ò @Ò»% 


Figura 11-7. PSET.BAS. Un esempio dell’enunciato PSET. 


uno schermo a bassa risoluzione, per esempio 320*200, mentre coprirà 
solo l’angolo superiore sinistro di uno schermo ad alta risoluzione, per 
esempio 640*480. 


Modifica dei colori dello sfondo e di quelli in primo piano 


Il capitolo 6 ha introdotto brevemente l’enunciato COLOR, che presenta la 
seguente sintassi: 


COLOR [primo piano][, sfondo] 


primo piano e sfondo sono i valori che rappresentano dei colori in primo 
piano e sullo sfondo. I valori utilizzabili dipendono dalla modalità grafica in 
cui si trova l’adattatore video (si veda la tabella 11-2). Se non viene specifi- 
cato alcun valore, QBasic usa quello corrente; se l’argomento primo piano 
non viene specificato bisogna far precedere l’argomento sfondo da una virgo- 
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Chiamate di funzione n non ammesse: 


è c << di certo dic eseguire un n programma ( che include e enunciati i gra _ 


Chiamata di funzione non valida 


la. Il valore dell’argomento primo piano determina il colore del testo e delle 
forme grafiche; può essere cambiato in un qualsiasi punto del programma 
senza che il cambiamento si rifletta sul testo o le figure già visualizzate sullo 
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schermo. Il valore dell’argomento sfondo specifica il colore dello sfondo 
(questo può essere modificato solo nelle modalità 0, 7, 8,9, 10). 


Osservate che la modifica del colore dello sfondo non ha un effetto im- 


mediato; per convertire l’intero sfondo al nuovo colore bisogna includere nel 
programma un'istruzione per l’aggiornamento del colore dello sfondo. L°e- 
nunciato CLS è molto utile a questo scopo anche se è consigliabile usarlo al- 
l’inizio del programma per evitare che cancelli il testo o la grafica già 
visualizzata sullo schermo. 


L’enunciato PRESET 


L’enunciato PRESET funziona allo stesso modo di PSET, tranne che per un 
importante aspetto. Se l'argomento colore non viene specificato, QBasic mo- 
stra il pixel nel colore dello sfondo, il che permette di cancellare dei pixel 
semplicemente non specificando questo argomento. L’enunciato PRESET 
presenta la seguente sintassi: 


PRESET (coordinataX, coordinataY)[, colore] 


Notate che l’enunciato PRESET cancella qualunque cosa si trovi in corri- 


spondenza a (coordinataX, coordinataY). Per esempio, se si usa un enunciato 
PRINT per stampare un messaggio e poi si usa un enunciato PRESET le cui 
coordinate coprono parzialmente l’area in cui si trova il messaggio, è possibi- 
le che il messaggio venga tagliato. 


Esercizio: Uso dell’enunciato PRESE T 


1. 


2. 


Scrivete il programma PRESET.BAS (figura 11-8). 


Eseguite il programma. Se il vostro adattatore video lo permette specifi- 
cate il valore 1, 7 o 13 per ottenere il massimo effetto. I commenti nel 
programma mostrano cosa bisogna cambiare per trarre il maggior vantag- 
gio da modalità ad alta risoluzione. 

Durante l’esecuzione del programma potete osservare un interessante ef- 
fetto di PRESET. Appena prima che cominci il “bombardamento” il pro- 
gramma stampa il messaggio ‘Premete un tasto qualsiasi per terminare”, 
messaggio che viene poi demolito dal “bombardamento stesso”. 

Notate l’uso della funzione INKEY$, che appare in questo programma 
per la prima volta. La funzione controlla la tastiera per verificare se qual- 
che tasto è stato premuto; in questo caso INKEY$ restituisce il codice 
ASCII associato con il tasto, altrimenti restituisce una stringa vuota. A 
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- PRESET SAS ___ÒÒÒvuù 
- n Questo. programma mostra .: ‘uso dell! ‘enunciato O PRESET 


ue di colonna casuale pe 
i. bombardamento"; - 
su orizzontale di 320; 


o)\ | verticale di i. va modi ficato per modalità 
L.A)... “con risoluzioni. più elevate ....... 
na (randcoti, «__-‘ } 


Figura 11-83. Una dimostrazione dell’ enunciato PRESET. 


differenza di INPUT e LINE INPUT la funzione INKEY$ non aspetta 
che l’utente prema Invio per continuare. 
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Posizionamento dei pixel tramite coordinate 


Si possono usare due sistemi di coordinate per posizionare i pixel sullo scher- 
mo: coordinate assolute e coordinate relative. 


Coordinate assolute 


Il sistema di coordinate usato fino ad ora è il sistema di coordinate assolute. 
In questo sistema tutti valori delle coordinate sono basati su quelle dell’ango- 
lo superiore sinistro, (0, 0). Per posizionare un pixel sullo schermo bisogna 
perciò calcolare (o indovinare) il numero di colonne a destra e il numero di ri- 
ghe in basso, individuando in questo modo i valori delle coordinate di quel 
pixel. 

Questo sistema funziona molto bene ma se si vogliono usare singoli pixel 
per creare una forma particolare si va incontro a una grande quantità di calco- 
li. Il sistema di coordinate relative semplifica di molto il lavoro. 


Coordinate relative 


Con questo sistema le coordinate definite per uno specifico pixel sono relati- 
ve all’ultimo pixel posto sullo schermo. 

La figura che segue mostra i due diversi sistemi: per collocare il primo 
pixel si devono usare coordinate assolute perché non esiste alcuna posizione 
di riferimento; per il secondo e i successivi si possono usare le coordinate re- 
lative. 

Per usare il sistema di coordinate relative ci si serve della parola chiave 
STEP usata con gli enunciati PSET e PRESET. 


La parola chiave STEP 


La sintassi di un enunciato PSET che contiene la parola chiave STEP è la se- 
guente: 


PSET STEP (coordinataX, coordinata)Y)[, colore] 


Notate che la sintassi è identica a quella di un enunciato PRESET. 

I valori coordinataX e coordinataY sono numeri positivi o negativi che 
dicono a QBasic dove posizionare il pixel in relazione a quello precedente 
posizionato con un enunciato PSET o PRESET. Se non esiste alcun pixel, 
QBasic usa le coordinate assolute (0, 0). 
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Pixel posizionato con coordinata assoluta (20,20) 


TT 


Pixel posizionato 10 colonne 
a destra e 10 righe in basso 
rispetto a quello precedente. 


La figura che segue mostra questo effetto a catena: la posizione di ogni 
pixel, tranne il primo , dipende dalla posizione del pixel precedente. Ricorda- 
te sempre che la parola chiave STEP posiziona un pixel relativamente alla 
posizione dell’ultimo pixel posizionato. 


30 colonne 50 colonne 
la E] 
; ° 30 righe 


10 righe 


PSET (20,20) 
PSET STEP (30,30) 
PSET STEP (50,10) 


da Esercizio: Uso della parola chiave STEP 
| 1. Scrivete il programma STEP-1.BAS (figura 11-9). 
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i STEP- 1. 8AS. 


"INT(RND(1) * 
s-\ I 


Figura 11-9. Viaggiare nello spazio con la parola chiave STEP. 


di 


Eseguite il programma e specificate un valore per lo schermo. Poiché il 
programma presuppone una risoluzione di 320*200 cercate, se possibile, 
di usare un valore pari a 1, 7 o 13. Il programma può essere interrotto 
premendo un tasto qualsiasi. | 
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Questo programma dà l’illusione di viaggiare nello spazio simulando il 
movimento delle “stelle”. All’interno del loop DO il programma imposta 
un pixel “invisibile” al centro dello schermo che rappresenta il punto di 
riferimento sul quale i successivi enunciati PSET basano le loro coordi- 
nate. Il numero casuale quad% determina in quale quadrante la stella ap- 
parirà. Notate i due enunciati IF (uno per i quadranti 0 e 1 e l’altro per i 
quadranti 0 e 3; il quadrante 2 usa valori positivi per cui nessuna modifi- 
ca è necessaria): i valori modificati in questi enunciati si riflettono sulle 
coordinate di PSET nel loop FOR (alcune usano coordinate positive, altre 
negative, altre entrambe). 


Nell’enunciato PSET un numero scelto a caso viene moltiplicato per il valore 
corrente della variabile loop 1%. Dopo ogni loop il valore risultante aumenta, 
facendo in modo che la stella si allontani dal centro dello schermo, acquisen- 
do velocità quando si avvicina ai limiti dello schermo stesso. 

Infine, notate come viene usato l’enunciato PRESET: la parola chiave 
STEP fa in modo che PRESET usi coordinate relative (coordinate determina- 


te dall’enunciato PSET). Poiché le coordinate fornite sono (0, 0), l’enunciato 


PRESET forza QBasic a collocare i pixel PRESET nella stessa posizione dei 
pixel PSET che li precedono, cancellandoli. 


CREAZIONE DI FORME COMPLESSE 


La possibilità di definire singoli pixel fornisce un controllo molto elevato sul- 
la creazione di grafici nello schermo di output. Tuttavia, per forme complesse 
quali righe, riquadri, cerchi e poligoni le coordinate da calcolare possono es- 
sere moltissime; nel caso di una riga si potrebbe usare un loop per definire i 
punti individuali ma, nonostante questo, sarebbe necessaria una gran quantità 
di calcoli. Per nostra fortuna QBasic fornisce una serie di strumenti che facili- 
tano la creazione di forme complesse. 
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Disegnare una linea semplice 
Nella sua forma più semplice l’enunciato LINE presenta questa sintassi: 
LINE (x1, y1) - (x2, y2) [, colore] 


Notate che, a differenza di PSET e PRESET, che usano una sola coppia 
di coordinate, l’enunciato LINE ne richiede due: 


i x/eylsonole coordinate di riga e colonna del punto di inizio della linea. 


sm x2ey2 sonole coordinate di riga e colonna del punto in cui termina la li- 
nea. 


Questo esempio mostra come funziona l’enunciato LINE: 


LL 


LINE (20, 10) - (70,60) 


Si noti che il punto di inizio non deve necessariamente trovarsi alla sini 
stra del punto di fine. È importante specificare le coordinate lasciando poi che 
L’enunciato LINE QBasic riempia i punti compresi tra i due estremi. 

Come per altri comandi grafici, l’intervallo di valori validi per x/, y/, 22, 
e y2 dipende dalla modalità dell’adattatore video. Le coordinate vanno rac- 
chiuse tra parentesi e separate da un trattino. 


L’enunciato LINE serve alla creazione di linee senza richiedere un grande 
sforzo da parte vostra. 
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Esercizio: Uso dell’enunciato LINE 
È 2 1. Scrivete il programma LINE-1.BAS (figura 11-10). 
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Per creare un riquadro si usa ancora l’enunciato LINE con una sintassi 
modificata: 


LINE (x1, y1) - (x2, y2)[, [coltore][, [B[F]]]] 


La differenza rispetto alla sintassi vista in precedenza sta nell’uso delle 
opzioni B e F. Se si usa B, QBasic disegna una linea usando le coordinate ini- 
ziali e finali come angoli opposti del riquadro, in questo modo: | 


“ara 


LINE (20, 10) - (70,60),,B 


Li 


Notate che QBasic non disegna una riga tra i punti di inizio e fine come 
farebbe nella caso di un enunciato LINE semplice. 

Se invece si usa l’opzione F, subito dopo B, QBasic riempie il riquadro 
con il colore scelto per il primo piano. Questa opzione può essere usata solo 
insieme a B. 


Esercizio: Riquadri pieni e vuoti 
* 1. Scrivete il programma LINE-2.BAS (figura 11-11). 
2. AI momento dell’esecuzione il programma crea una serie casuale di ri- 
quadri vuoti o pieni, in base alle vostre risposte. I riquadri possono essere 


di qualsiasi dimensione o forma e possono essere collocati dovunque sul- 
lo schermo. 


Figura 11-10. Un programma che disegna righe a caso attraverso l’ enunciato LINE. 


2. Il programma chiede di definire una modalità schermo e il massimo nu- 
mero di colori per pol stampare delle linee sullo schermo, a caso e in co- 
lori diversi. Premete un tasto qualsiasi per uscire dal programma. 


Disegnare un ri Ì 
g un riquadro Disegnare forme complesse 


ii In cu È molto semplice. Si potreb- Le linee e i riquadri pieni e vuoti visti piu ad ora erano basati sull’uso di co- 
lc È SIE; ispone di una particolare fun- ordinate assolute. Tuttavia, anche con 1 enunciato LINE (come per PSET e 

parmiare tempo e ridurre i calcoli necessari. PRESET) è possibile l’uso della parola chiave STEP per specificare coordi- 
nate relative anche nel disegno di un riquadro. Si può anche omettere il punto 
di inizio della linea o del riquadro, costringendo QBasic a usare le coordinate 
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Figura 11-11. Disegno di riquadri a caso con l’ enunciato LINE. 


ci finale dell’ultimo oggetto disegnato come punto iniziale per la nuo- 
va linea. 


La sintassi dell’enunciato LINE con l’uso di coordinate relative è la se- 
guente: 


LINE [[STEP](x1, y1)] - [STEP](x2, y2)[, [colore][, [B[F]]]] 


| L’uso di coordinate relative permette di creare disegni complessi rispar- 
miando tempo. La figura 11-12 mostra alcuni esempi di enunciati LINE che 


usano coordinate assolute e relative e i loro risultati. Notate che si presuppone 
che il punto finale sia impostato a (20, 20). 


344. 
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Enunciato LINE Risultato 


LINE — (30, 50) Disegna da (20, 20) a (30, 50) 
LINE — STEP(30, 50) Disegna da (20, 20) a (50, 70) 
LINE(40, 40) — STEP(60, 60) Disegna da (40, 40) a (100, 100) 
LINE STEP(30, 50) — (70, 70) Disegna da (50, 70) a (70, 70) 
LINE STEP(30, 50) — STEP(70, 70) Disegna da (50, 70) a (120, 140) 


Figura 11-12. Risultati di enunciati LINE usate con coordinate assolute e relative. 


Dalla figura 11-12 si possono trarre alcune conclusioni: 


Se si omettono le coordinate di inizio QBasic usa, come coordinate di ini- 
zio, quelle del punto più recente. 


Se si omettono le coordinate di inizio e si usa la parola chiave STEP con 
le coordinate di fine, QBasic posiziona il punto finale in relazione alle 
coordinate del punto più recente. 


Se si includono le coordinate di inizio e si usa la parola chiave STEP con 
le coordinate di fine, QBasic posiziona il punto finale in relazione alle 
coordinate di inizio specificate. 


Se si usa la parola chiave STEP con le coordinate di inizio e non la si usa 
con quelle di fine, QBasic posiziona le coordinate di inizio in relazione 
alle coordinate del punto più recente e posiziona il punto di fine alle co- 
ordinate assolute specificate. 


Se si usa la parola chiave STEP con le coordinate di inizio e di fine, 
QBasic posiziona le coordinate di inizio in relazione alle coordinate del 
punto più recente e posiziona il punto finale in relazione alle coordinate 
del punto iniziale appena calcolato. 


L’uso di coordinate relative permette di collegare linee e riquadri, sem- 


plificando il disegno di forme complesse. 


Esercizio: Lavorare con LINE e coordinate relative 


Scrivete il programma STEP-2.BAS (figura 11-13). 


Eseguite questo semplice programma che inizia disegnando un pixel alle 
coordinate (150, 50), punto d’inizio del disegno. Buona parte del lavoro 
viene fatta dal loop DO. Il programma chiede di definire i valori orizzon- 
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coordinataX e coordinataY sono le coordinate di schermo orizzontale e 
verticale già viste. Questi valori dicono a QBasic dove posizionare il centro 
del cerchio. 

raggio è il valore che specifica, in pixel, il raggio del cerchio (il raggio di 
un cerchio è la metà del diametro). colore è un intero che dice a QBasic di 
che colore dev'essere il cerchio; se questo valore non viene specificato QBa- 
sic usa il colore di primo piano corrente. 

Come per gli altri enunciati grafici le coordinate usate dipendono intera- 
mente dalla modalità grafica impostata con l’enunciato SCREEN. 


Esercizio: Uso dell’enunciato CIRCLE 
1. Scrivete il programma CIRCLE-1.BAS (figura 11-14). 


2. Eseguitelo, specificando la modalità schermo. Il programma chiede di 

specificare un valore di colonna, uno di riga e uno per il raggio; l’enun- 
ciato CIRCLE disegna un cerchio in base ai valori specificati. Poi, quan- 
do si preme Invio per continuare, l’enunciato CLS ripulisce lo schermo e 
il processo si ripete fino a quando si digita f o F. 
Provate a inserire dei valori più grandi delle coordinate massime dello 
schermo o a specificare un raggio molto ampio. Questa tecnica può dar 
vita a effetti molto particolari come la creazione di archi su un lato dello 
schermo. 


' CIRCLE-1.BAS 
' Questo programma mostra l'uso dell'enunciato CIRCLE 


Figura 11-13. Un semplice programma di disegno. 


tali e verticali, che possono essere sia positivi che negativi. Dopo aver ac- 


quisito questi valori il programma usa l’enunciato LINE con STEP per | Disegnare archi 


di la linea. 1 ui | 3 
1segnare la lmea L’enunciato CIRCLE permette anche di disegnare archi (segmenti di un cer- 


chio). In questo caso l’enunciato CIRCLE va usato con i valori di inizio e di 


L’enunciato CIRCLE fine: 


QBasic permette anche di creare dei cerchi. Con l’enunciato CIRCLE si pos- O CIRCLE (coordinataX, coordinataY), raggio[, [colorelL, 

sono creare cerchi di varie dimensioni che, se usati con altri strumenti grafici, ! L'inizio] [fine]]] 

possono dar vita a figure utili e interessanti. La sintassi è simile a quella precedente ma con l’aggiunta dei valori di 
Nella sua forma più semplice l’enunciato CIRCLE presenta questa sin- o inizio e fine. I valori di inizio e fine sono le misure, in radianti, del punto ini- 

ASSE: O ziale e finale dell’arco. 

CIRCLE (coordinataX, coordinataY), raggio[, colore] i Sebbene sia più comune misurare gli archi in gradi l’enunciato CIRCLE 


richiede che le misure di inizio e fine vengano fornite in radianti. La figura 
| 11-15 mostra la relazione tra il sistema di misurazione in gradi e quello in ra- 


| 
| 
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Le misurazioni iniziano da 0 (ore 3) e progrediscono in senso orario fino 
a un massimo di 6.28 radianti; il punto iniziale (0) e finale (6.28) coincidono. 

I valori iniziali e finali indicati sono numeri compresi tra 0 e 6.28 (questo 
valore è tecnicamente 2 * pi greco; per semplicità usiamo dei numeri arroton- 
dati). 

Se si mette un segno meno davanti al valore iniziale o finale, QBasic di- 
segna una riga (il raggio) da quel punto sull’arco fino al centro del “cerchio”. 


Esercizio: Lavorare con gli archi | 
der 1. Scriveteil programma CIRCLE-2.BAS (figura 11-16). 


Figura 1 11-14. Un semplice programma per il disegno di cerchi. 


dianti. Potete usare questa figura come riferimento per determinare il punto di 
: 

inizio e fine dell arco da disegnare (infatti sono state incluse informazioni 

sulla conversione, che possono essere molto utili). 


1 radiante 


1 A \ AN radiante 


Inizio e fine alle 3 — 
lavora in senso orario 


3.14 radianti ee È 


\ >*__p 0 6.28 radianti 


1 radiante 
1 radiante 


Radians = (3.14159 x (angolo in gradi) + 180 
1 grado = 0.0174532 radiante 


Figura 11-15. Misurazione di un arco in radianti. 


Figura 11-16. Un programma per la creazione di archi. 
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2; Eseguite il programma e sperimentate la creazione di archi, inserendo i 
valori di inizio e fine (da 0 a 6.28) e mettendo un segno meno davanti a 


uno dei numeri se volte che QBasic disegni una linea da quel punto al ‘ 


centro del cerchio). Notate che il valore di inizio può essere più piccolo 
del valore di fine. Provate varie combinazioni di valori per vedere i diver- 
si effetti. 


UN ULTIMO SGUARDO ALLA GRAFICA 
IN QBASIC 


Abbiamo visto che QBasic offre un gruppo di strumenti di disegno utili e po- 
tenti. Purtroppo non siamo in grado di analizzarli tutti in questo libro ma 
quelli visti sono più che sufficienti per cominciare a imparare la program- 
mazione grafica e per inserire effetti particolari nei vostri programmi: 


Bi Graficia barre che rappresentano graficamente dei dati. 
Grafici a torta che mostrano la distribuzione dei dati in diverse categorie. 
Figure che rendono più interessanti i programmi. 


Programmi per proteggere lo schermo. 


Animazioni per giochi e simulazioni. 


NOTA: La guida in linea di QBasic è in grado di fornire 
ulteriori informazioni sulla programmazione grafica. 


INTRODUZIONE ALLA PROGRAMMAZIONE 
SONORA 


Abbiamo visto come usare grafici per ravvivare i programmi; un altro modo 


bi 


per rendere i vostri programmi più “vivaci” è quello di sfruttare le funzionali- 
tà sonore del vostro computer. 


Ancora sull’enunciato SOUND 


Nel capitolo 6 abbiamo brevemente introdotto l’enunciato SOUND, parlando 
di loop. Cercheremo ora di approfondire l'argomento. 
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L’enunciato SOUND presenta questa sintassi: 
SOUND frequenza, durata 


frequenza è un valore intero da 37 a 32767 che indica la frequenza, in 
hertz (cicli al secondo) del tono desiderato; basse frequenze creano dei toni 
bassi e viceversa. Notate che l’orecchio umano è in grado di percepire le fre- 
quenze tra i 20 e i 20000 hertz e che i toni con frequenze sopra 1 16000 hertz 
sono più facilmente udibili dai cani che dalla maggior parte delle persone. La 
figura 11-17 elenca i valori di frequenza standard e le note loro associate dal- 
1’ American Standards Association nel 1936. | 

durata è un valore intero che indica a QBasic la durata di una certa nota; 
questo valore specifica la durata in termini di “segmenti di secondo” (ci sono 
18.2 segmenti in un secondo; perciò un durata di 9.1 indicherebbe a QBasic 
di suonare una certa nota per mezzo secondo). 

In un enunciato SOUND è necessario specificare sia la frequenza che la 
durata. | 

Nei programmi visti fino ad ora che comprendevano effetti sonori non 
c’era alcuna intenzione di creare delle melodie ma è possibile abbinare 1 va- 
lori di frequenza alle note musicali scelte. Siccome il più piccolo valore di 
frequenza utilizzabile con SOUND è 37, la nota più bassa che potete suonare 
è REFI. 

Il numero a fianco di ciascuna nota ne indica l’ottava. Potete notare che 
per alzare una nota di un’ottava è sufficiente raddoppiarne la frequenza (ap- 
prossimativamente). Per esempio DO2 ha una frequenza di 65.41 hertz e 
DO3 una frequenza di 130.81, che è circa il doppio di DO2. Ciò può essere 
utile quando si vuole aggiungere della musica ai programmi, perché basta 
raddoppiare la frequenza per aumentare una nota di un’ottava. 


ea Esercizio: Uso dell’enunciato SOUND 


1. Scrivete il programma SOUND-1.BAS (figura 11-18). 


2. Eseguite il programma e inserite un valore di ottava. Notate che la tabella 
delle frequenze nell’enunciato DATA comincia con DO2, per cui, se in- 
serite un valore di ottava pari a 1, il programma esegue una scala mag- 
giore da DO2 a DO3. Siccome l’enunciato SOUND accetta solo valori 
interi come frequenze, l’enunciato DATA contiene valori arrotondati al- 
l’intero più vicino. 
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Figura 11-17. Frequenze delle note musicali comprese nell’estensione di circa sette 


Notazione musicale in QBasic 


La maggior parte di noi non ha grande familiarità con le note musicali in ter- 
mini di frequenza, ma QBasic richiede che gli venga indicato quale nota suo- 
nare attraverso la frequenza assegnata a quella nota. 

Se pensate di aggiungere degli effetti musicali ai vostri programmi avre- 
| te la necessità di convertire le note musicali nelle frequenze loro associate. A 
questo fine può essere utile creare una tabella di conversione. 
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Frequenza 


38.89 
41.20 
43.65 
46.25 
49.00 
51.91 
55.00 
58.27 
61.74 
65.41 
69.30 
73.42 
TT.78 
82.41 
87.31 
92.50 
98.00 
103.83 
110.00 
116.54 
123.47 
130.81 
138.59 
146.83 
155.56 
164.81 
174.61 
185.00 


ottave. 


Frequenza 


196.00 
207.65 
220.00 
233.08 
246.94 
261.63 
277.18 
293.66 
311.13 
329.63 
349.23 
369.99 
392.00 
415.30 
440.00 
466.16 
493.88 
523:25 
904.37 
587.33 
622.25 
659.26 
698.46 
739.99 
783.99 
830.61 

880.00 


LA#5 
SI5 
DO6 
DO#6 


Nota 


Frequenza 


932.33 

e PATATA 
1046.50 
1108.73 
1174.66 
1244.51 
1328.51 
1396.91 
1479.98 
1567.98 
1661.22 
1760.00 
1864.66 
1975.53 
2093.00 
2217.46 
2349.32 
2489.02 
2637.02 
2793.83 
2959.96 
3135.96 
3322.44 
3520.00 
3/29.31 
3951.07 
4186.01 
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Figura 11-18. Un programma che esegue una scala di note. 


Lavorare da spartito 


Sebbene non rientri nello scopo di questo libro spiegare la notazione musicale 
in dettaglio, i suggerimenti che seguono possono essere utili quando si vuole 
aggiungere effetti musicali ai programmi. Diamo un'occhiata alla figura 11- 
19 che mostra i nomi e le posizioni delle note. 


F, Gr Aj Bj C, D) E; Fà G7 A) B3 C3 D3 


Figura 11-19. Nomi e posizioni delle note sul pentagramma. 
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Se lavorate partendo da uno spartito potete abbinare le vostre note con 1. Scrivete il programma SOUND-2.BAS (figura 11-21). 
quelle della figura e poi verificare la frequenza associata nella figura 11-17. 
Vi suggeriamo di trascrivere nel vostro denti musicale la frequenza associata 
a ogni nota. 

Per individuare i valori di durata da inserire nell’enunciato SOUND basta 
decidere quanto a lungo si vuole che duri una nota di un intero e poi dividere 
il valore per 2 per avere la metà, per 4 per avere il quarto e così via. Dopo 
aver stabilito questi valori potete riportarli nel vostro spartito accanto a cia- 
scuna nota. 

Dopo aver determinato i valori di frequenza e durata per tutte le note po- 
trete aggiungere la melodia al vostro programma. 


a Esercizio: Suonare una canzone con QBasic 


La figura 11-20 mostra la musica della canzone americana My Bonnie Lies 
Over the Ocean. Dopo aver calcolato frequenza e durata abbiamo scritto un 
breve programma per eseguire questa canzone. 


BON-NIE LIES  O-VER THE O-CEAN 


Figura 11-21. Un programma che suona una canzone. 


G E D C D C A GG E 


LS ou rr —___ mb] 
RE DA N DOO N I O AO O 
I 7. VE CETO ERI NOI OOATI NSSSON RSI ea 
[ES pito ci 


2. Eseguite il programma e sentirete QBasic suonare la canzone. Si noti che 

i valori di frequenza e durata si alternano negli enunciati DATA. Nel lo- 
op FOR l’enunciato READ legge i due valori (uno per la frequenza e uno 
per la durata) sempre attraverso il loop. 
Esercitatevi con l’enunciato SOUND per vedere che controllo avete sui 
valori dell’enunciato DATA. Provate a moltiplicare nota% per 2 per alza- 
re le note di un’ottava e a dividere durata% per 2 per osservare gli effetti 
sul tempo di esecuzione. 


MY  BON-NIE LIES. O-VER THE  O-CEAN 


O BRING BACK MY BON-NIE TO ME 


Figura 11-20. Musica per My Bonnie Lies Over the Ocean. 
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SOMMARIO 


QBasic dispone di molti strumenti per la creazione di grafici e suoni (noi ab- 
biamo visto solo i fondamentali). Dopo aver completato gli esercizi di questo 
libro sperimentate ulteriormente coi programmi visti in questo capitolo, usan- 
do la guida in linea per aver maggiori informazioni su questi argomenti. Gra- 
fici e suoni non sono argomenti di programmazione facili da apprendere ma 
sono in grado di rendere i vostri programmi molto più interessanti. 


DOMANDE ED ESERCIZI 


1. Quali sono i due componenti dell’apparecchiatura video del vostro com- 
puter e qual è la loro funzione? 


2. Qual è la differenza tra modalità testo e grafica? 
3. Qual è la funzione dell’enunciato LOCATE? 


4. Scrivete un breve programma che chiede all’utente di inserire un nome 
per poi visualizzarlo sul lato sinistro dello schermo e “spostarlo” su quel- 
lo destro. 


5. Qual è la funzione dell’enunciato SCREEN? 


6. Qual è la funzione degli enunciati PSET e PRESET e in cosa differisco- 
no? 


7. Qual è la differenza tra coordinate relative e assolute? 


8. Vero o falso: per disegnare un riquadro pieno si può usare un enunciato 
LINE. 


9. Vero o falso: per disegnare un cerchio pieno si può usare un enunciato 
CIRCLE. 


10. Scrivete un programma che disegna un cerchio vicino al lato sinistro del- 


lo schermo e poi lo “sposta” a destra. (Un suggerimento: non dimenticate 
di cancellare il primo cerchio.) 
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Fino ad ora abbiamo studiato molti aspetti importanti della programmazione 
in QBasic che costituiscono le basi per diventare dei programmatori esperti. 
Tuttavia succede spesso che un programma, anche se è stato scritto da pro- 
grammatori esperti, si rifluti di girare. In queste situazioni diventa importante 
diagnosticare e risolvere eventuali problemi ed errori di programmazione ed è 
qui che entra in gioco il concetto di debug. 

Con Debug si intende il processo di individuazione e correzione di errori 
in un programma. L'abilità di individuare e correggere un problema in un 
programma è uno degli aspetti più importanti che un programmatore alle pri- 
me armi deve sviluppare. Il debug richiede la capacità di pensare in modo 
modulare (di analizzare un programma come farebbe un computer, control- 
landone l’esecuzione passo dopo passo) al fine di trovare il problema che im- 
pedisce al programma di svolgere il proprio compito. 

Fortunatamente QBasic dispone di molti potenti comandi di debug che 
alutano a esaminare i programmi. Questo capitolo introduce questi comandi e 
descrive come programmare in modo da ridurre al minimo gli errori. In parti- 


colare verrà mostrato il debug di un programma dall’inizio alla fine per speri- 


mentare 1 comandi descritti. 


IL PROCESSO DI DEBUG 


Il debug di un programma consiste nel ripetere queste azioni fino a quando il 
programma viene eseguito con successo: 


1. Eseguire il programma. 
2. Osservare errori e punti problematici. 


3. Isolare e studiare gli enunciati che hanno prodotto gli errori, usando gli 
strumenti di programmazione. 


4. Correggere gli errori. 


Se disponete di una stampante può essere utile stampare una copia di 
ogni programma di cui volete fare il debug; lo studio del codice è infatti uno 
degli aspetti principali della ricerca degli errori e la stampa su carta risulta 
spesso più facile da leggere. 
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. nu - errore ... è . errore umano @n errore _ programmazione 
che forza il, pon a dare dei risultati sbagliati) I RIIA5 sforzi . 


COMANDI DI MENU DI QBASIC 


QBasic dispone di comandi di menu che aiutano a individuare i bug del pro- 
gramma. Nelle sezioni che seguono vedremo i comandi collegati al debug- 
ging all’interno dei menu Esegui, Debug, Visualizza e Opzioni. Per maggiori 
informazioni su questi comandi può essere utile consultare la Guida on-line. 


Il menu Esegui 


Il menu Esegui contiene tre comandi correlati al debug: 


Start (Maiusc-F5) esegue il programma attualmente in memoria dall’ini- 
zio e a velocità piena. Premete Ctrl-Break per interrompere il programma 
in fase di esecuzione. 
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Immed 


Fi=Guida | Esegue il programma corrente |... ‘8 BABBI:B01. 


E Riavvia reimposta tutte le variabili del programma e evidenzia il primo I 


enunciato eseguibile. Usate questo comando per spostarvi all’inizio del 
programma prima di eseguire gli enunciati una alla volta coi comandi 
Passo e Procedura passo del menu Debug. 


Bi Continua (F5) esegue il programma attualmente in memoria dalla riga 


corrente. Usate questo comando per continuare l’esecuzione del pro- 
gramma a velocità piena. 


Il menu Debug 


Il menu Debug contiene sei comandi correlati al debug: 


Bi Passo (F8) esegue un enunciato ed evidenzia quello successivo eseguibi- 


le. Usate questo comando per eseguire il programma un'istruzione alla 
volta. 


Bi Procedura Passo (FIO) esegue un enunciato ed evidenzia quello succes- 
sivo eseguibile. A differenza di Passo, questo comando esegue un intero 
sottoprogramma o una funzione definita dall’utente come un passo. 


3 Analizzail flusso è un comando interruttore che prepara il programma 
per un'esecuzione rallentata; quarido è attivo, un programma viene ese- 
guito lentamente e ogni suo enunciato viene evidenziato al momento del- 
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File Modifica Visualizza Cerca Esegui den) Opzioni 
Senza | 


| Pasocedura passo 
i 


fhalizza il flusso 


| Pinto di interruzione F9 
| Nlimina ogni punto di interruzione 
MImposta istruzione successiva 


Immediato 


Fi=Guida | Esegue l'istruzione successiva del programma _ AROdI ABI 


l’esecuzione; quando è disattivato il programma viene eseguito a velocità 
normale. 


Bi  Puntodi interruzione (F9) imposta o cancella un breakpoint nel program- 

ma (una linea in corrispondenza alla quale il programma si interromperà) 

© se disponete di un monitor a colori noterete che queste linee appaiono in 
rosso per definizione. 


si Elimina ogni punto di interruzione cancella tutti i breakpoint impostati 
col comando precedente. Usate questo comando per cancellare più break- 
point allo stesso tempo. 


i Impostaistruzione successiva imposta la riga in cui si trova il cursore co- 
me prossimo enunciato da eseguire. Usate questo comando per rieseguire 
degli enunciati o per saltare quelle che non volete eseguire. 


Il menu Visualizza 


Il menu Visualizza contiene un comando correlato al debug: 
a Schermo output (F4) mostra i contenuti dello schermo di output. Usate 
questo comando mentre esaminate il programma per vedere i risultati 


sullo schermo di output. Per tornare nell’ambiente di modifica basta pre- 
mere un tasto qualsiasi 
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File Modifica RIESWNEzAR Cerca Esegui Debug Opzioni 


| Schermo Futput 


«Éi 


Immediato 


 Fi=Guida | Visualizza w' istruzione SUB o FUNCTION caricata | BGRG1 : 01] 
Il menu Opzioni 
Il menu Opzioni contiene un comando correlato al debug: 


&à Verifica sintassi è un comando interruttore che disattiva il controllore 
automatico di sintassi di QBasic, che è normalmente attivo. 


File Modifica Visualizza Cerca Esegui Debug [if 
Senza titolo 


jScheeno _______LNl 
i lercorso di guida... |(- 
erifica sintassi 


Immediato 


00001 :001) 


Fi=Guida | Cambia gli attributi dello schetmo - | “© —— 
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In aggiunta a questi comandi si può usare il tasto F7 per eseguire a velo- 
cità piena la riga corrente e le righe comprese tra questa e il cursore. Questo 
tasto è una scorciatoia per l'impostazione di breakpoint con il tasto F9 e per 
l’esecuzione del programma dalla riga corrente al breakpoint col tasto FS. 


CONTROLLO DELLE VARIABILI CON PRINT 


Un altro utile strumento per il debug è un enunciato che abbiamo già visto, 
PRINT. Inserendo questi enunciati nel programma o usandoli nella Finestra 
Immediato si possono esaminare i contenuti delle variabili durante l’esecu- 
zione di una programma (può essere utile visualizzare questi enunciati in un 
colore diverso per differenziarli dai risultati del programma). Una volta usati 
per il debug non scordate di togliere gli enunciati PRINT dal vostro program- 
ma. 

L’esercizio seguente usa PRINT per trovare un errore logico contenuto 
nel programma. 


Esercizio: Uso di PRINT per controllare una variabile che cambia 


Il programma TROVABUG.BAS (figura 12-1) è un semplice indovinello che 
chiede all’utente di indovinare la dimensione in galloni del più grande frappè 
mai fatto (un record stabilito nell’Ohio nel 1988). Sebbene il programma ven- 
ga eseguito senza errori di sintassi, non funziona in maniera corretta: indipen- 
dentemente dal numero inserito, risponde sempre che il numero è troppo 
basso. Riuscite a trovare l’errore logico? 

Scrivete ed eseguite il programma TROVABUG.BAS. 

AI momento dell’esecuzione avrete un output simile a questo: 


a, 


Di quanti galloni è il più grande frappé mai fatto? 


Risposta: 100 troppo basso 
Risposta: 174 troppo basso 
Risposta: 1000 troppo basso 
Risposta: 15000 troppo basso 
Risposta: Ctrl-C 


Indipendentemente dal valore specificato (compreso quello esatto, 174) il 
messaggio che appare è sempre lo stesso: troppo basso. Il programma è bloc- 
cato in un loop infinito e il solo modo per interromperlo è quello di premere 
Ctrl-C o Ctrl-Break. 
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Figura 12-1. Un programma indovinello contenente un errore logico. 


| Proviamo a individuare l’errore usando l’enunciato PRINT per controlla- 
re il valore della variabile indovina% che cambia quando l’utente specifica un 
nuovo valore nel loop DO. 


È; Inserite gli enunciati seguenti (che visualizzano il valore della variabile 
indovina in rosso) alla fine del loop DO, prima dell’enunciato LOOP: 


COLOR 4: PRINT "DEBUG: indovina% ="; indovina%: COLOR 7 


Dopo questa modifica il vostro schermo dovrebbe apparire come mostra- 
to nella pagina successiva. 
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File Modifica Visualizza Cerca Esegui Debug Opzioni 
TROVABUG .BAS 


|cLs 


% 


PRINT "Di quanti galloni è il più grande frappé mai fatto?" 
PRINT 
IDO VHILE Cindovivaz <> FRAPPEx) 

INPUT : “Risposta: ”, indovina 


COLOR Z 
IF (indovina { FRAPPEx) THEN 
PRINT, "Troppo hasso" 
ELSEIF (indovinaz > FRAPPE) THEN 
PRINT, "Troppo alto" 
ELSE 
PRINT 
END IF 
COLOR 7 
COLOR 4: PRINT "DEBUG: indovinaz ="; indovinaz: COLOR ? 


Inmediato 


<Maius+Fi=Guida%<F6=Finestra}<F2=Suhs><F5-Esegui?<F8=Passo» M_ ©0019 :964 


L’enunciato PRINT è circondato da due enunciati COLOR: il primo 
cambia il colore in primo piano in rosso, il secondo lo riporta al colore bianco 
predefinito. Questo secondo colore può essere utile per distinguere l’output 
del programma dall’output degli enunciati di debug. Se il vostro schermo non 
è in grado di visualizzare il colore potete omettere gli enunciati COLOR. 


2. Eseguite nuovamente il programma e otterrete un output simile al se- 
guente, completo di informazioni di debug: 


Di quanti galloni è il più grande frappé mai fatto? 


Risposta: 100 troppo basso 


DEBUG: indovina% = 0 
Risposta: 1000 troppo basso 
DEBUG: indovina% = 0 


Risposta: 174 troppo basso 
Risposta: Ctrl-C 

Il risultato dell’enunciato PRINT è interessante perché nostra che per 
qualche ragione la risposta non viene assegnata alla variabile indovina%. Ci 
sono due possibili spiegazioni: vi è qualcosa di sbagliato con l’enunciato IN- 
PUT o la variabile indovina% è stata modificata in qualche punto. Riuscite a 
trovare l’errore adesso? 
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ntrollate bene le 
. 


globali c 


l 


Se esaminate l’enunciato INPUT scoprirete che il problema è nella varia- 


bile indovina%; infatti, nell’enunci iabi 
? ato INPUT, la RIO 
del carattere di dichiarazione del tipo (%) VERA NAcON Mara 


o UD; l è 
INPUT ; "Risposta: ", indovina 
Perciò QBasic considera indovina e indovina% come variabili separate 


3. Correggete l’enunciato INPUT aggiungendo il simbolo % dopo indovina: 
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INPUT ; "Risposta: ", indovina“ 


4. Eseguite il programma per assicurarvi che venga eseguito correttamente 
e poi togliete gli enunciati di debug che avevate aggiunto in precedenza. 


DEBUGGING DI UN PROGRAMMA 
IN DETTAGLIO 


Per sperimentare il controllo e la correzione degli errori, in questo paragrafo 
mostreremo il debug del programma DESSERT.BAS che usa una matrice per 
registrare le torte preferite e le loro calorie. 


DESSERT.BAS senza bug 


DESSERT.BAS chiede all’utente il nome e il numero di torte da inserire; il 
numero inserito viene usato per dimensionare una matrice monodimensionale 
di valori stringa in cui vengono conservati i nomi delle torte. Un sottopro- 
gramma aggiunge poi i dati alla matrice e fa la somma del numero di calorie 
inserite. Infine il programma stampa i contenuti della matrice e mostra le ca- 
lorie totali in colore rosso lampeggiante. 

L’output di DESSERT.BAS (se eseguito correttamente) dovrebbe essere: 


Benvenuti nel programma DESSERT! 
Scrivete il vostro nome: Lorenzo 
Quanti nomi di torte vuoi inserire, Lorenzo? 2 


Nome della torta: Crostata di ciliege 
Calorie della torte: 125 


Nome della torta: Torta al cioccolato 
Calorie nella torta: 310 


Questa è la lista delle torte preferite di Lorenzo: 


Crostata di ciliege 
Torta al cioccolato 


la lista contiene un totale di 435 calorie! 
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a Esercizio: Esecuzione del programma DESSERT.BAS 


Il 1 

i nà 
nte i I 

dini come appare nella figura ed eseguitelo per scoprire 


Fi - | 
igura 12-2. Un programma contenente due errori logici 
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L’output che otterrete sarà il seguente: 


Benvenuti nel programma DESSERT! 
Scrivete il vostro nome: Lorenzo 
Quanti nomi di torte vuoi inserire, Lorenzo? 2 


Nome della torta: Crostata di ciliege 
Calorie della torte: 125 


Nome della torta: Torta al cioccolato 
Calorie nella torta: 310 


Questa è la lista delle torte preferite di Lorenzo: 


Torta al cioccolato 


La lista contiene un totale di 310 calorie! 


Si possono vedere subito due problemi: il programma mostra solo uno 
dei valori contenuti nella matrice forte$ e non mostra il corretto valore delle 
calorie totali. Tenendo a mente queste due osservazioni si può iniziare a fare 
il debug del programma. 


Il debug del programma DESSERT.BAS 


La parte introduttiva del programma sembra a posto (mostra informazioni uti- 
li e ottiene i dati dall’utente). A questo punto possiamo inserire un breakpoint 
in mezzo al programma ed eseguire a piena velocità la prima sezione del pro- 
gramma. 


Impostazione di un breakpoint 
Impostare un breakpoint e poi eseguire il programma fino a quel punto è sem- 


plice: 


1. Selezionate il comando Riavvia dal menu Esegui per preparare il pro- 
gramma all'esecuzione dall’inizio (l’enunciato CLS, che è la prima ese- 
guibile nel programma, viene evidenziata). 
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2. Spostate il cursore in corrispondenza alla diciassettesima riga (quella che 


contiene l’enunciato DIM) e selezionate il Li 
e il comando Punto di int i 
dal menu Debug (F9). Si 


3. Selezionate il comando Continua dal menu Esegui (F5) per eseguire il 
programma fino al breakpoint; inserite il vostro nome e il numero 2, in ri- 


sposta alle richieste del programma. Q Li 
| . Questo sl interromperà un 
raggiunto il breakpoint. i a 


4. Selezionate il comando P ii i 
unto di interruzione(F9) (il breakpoi è Diù 
necessario). ( ) ( point non è piu 


Controllo del sottoprogramma RiceviDati 


Cerciamo ora di analizzare il sottoprogramma RiceviDati per capire che co- 
sa c'è che non funziona. 


k Selezionate il comando Passo dal menu Debug (F8) per eseguire l’enun- 
ciato DIM che dimensiona la matrice torte$. Questa dovrebbe essere 
grande abbastanza per contenere tutti i nomi inseriti dall’utente (questo è 
un valore conosciuto in anticipo e conservato nella variabile num%). No- 
tate che num% appare nell’enunciato DIM e che questo viene A uito 
senza errori (nessun problema dunque, fino a questo punto). i 


2. Selezionate il comando Passo (F8) tre volte per entrare nel sottoprogram- 


ma RiceviDati ed eseguire i primi due enunciati. Scrivete Crostata di ci- 
liege come prima risposta. 


3. Date un'occhiata al contenuti del sottoprogramma RiceviDati per vedere 
se tutto è in ordine (a volte un bug può saltare all’occhio facilmente). Un 
modo per esaminare il processo di input fino a questo punto è quello di 
SALE un enunciato PRINT nella Finestra Immediato: in questo caso 
l’enunciato PRINT ci serve per vedere se il primo nome viene corretta- 
mente collocato in corrispondenza al primo elemento di matrice$. Preme- 
te F6 per spostarvi nella Finestra Immediato e poi inserite questa ii 


COLOR 4: PRINT "DEBUG: matrice$(1) = "; matrice$(1): COLOR 7 


I due punti vi consentono di inserire più di un enunciato su una riga. Con 


DEBUG: matrice$(1) = 
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matrice$(1), il primo elemento della matrice matrice$, dovrebbe contene- 
re la stringa Crostata di ciliege, appena inserita, ma non lo fa; questo signifi- 
ca che ci dev'essere qualche errore nell’enunciato INPUT. In particolare ci 
dev'essere qualcosa di sbagliato che riguarda l’indice dell’assegnazione di 
matrice: questo dovrebbe infatti essere uguale a 1 la prima volta che il loop 


viene eseguito. 


4. Premete un tasto qualsiasi per tornare nella Finestra Immediato. 


Isolamento del primo errore logico 


Abbiamo appena diagnosticato il primo errore logico. Vediamo ora di isolar- 
ne le cause esaminando più in dettaglio l’enunciato INPUT e il suo ruolo nel 
loop FOR. Una regola base per l’efficacia degli indici di matrice e dei loop è 
che se il loop contiene una variabile di calcolo (che registra il numero di loop 
fatti) e tutti gli elementi della matrice devono essere usati, la variabile di cal- 
colo (o un suo derivato) dovrebbe essere usata come indice della matrice. Il 
sottoprogramma RiceviDati è corretto tranne che per l’indice della matrice; 
l’enunciato INPUT dovrebbe usare la variabile di calcolo i% come indice del- 
la matrice, al posto della variabile num%o. 

Correggete l’errore premendo F6 per tornare nella Finestra di digitazione 
e poi cambiando l’enunciato INPUT in questo modo: 


INPUT " Nome della torta: ", matrice$(i%) 


Controllo della correzione. 

Dopo aver corretto l’errore logico si può controllare nuovamente il program- 

ma: 

1. Lasciate il cursore sulla riga che contiene l’input per il nome della torta e 
selezionate il comando Imposta istruzione successiva dal menu Debug: 


questo comando permette di rieseguire l’enunciato INPUT per controlla- 
re la correzione (consentendo così un notevole risparmio di tempo). 


2. Premete F8 per eseguire il nuovo enunciato INPUT e poi inserite Crosta- 
ta di ciliege di nuovo. Per verificare che questo input venga collocato 
correttamente nel primo elemento di matrice$ basta premere F6, per pas- 
sare alla Finestra Immediato, spostare il cursore all’enunciato di debug 
PRINT e premere Invio per eseguirlo; questa volta lo schermo dovrebbe 
mostrare il corretto valore stringa, Crostata di ciliege. Premete un tasto 
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qualsiasi per tornare nella Finestra I i i 
. ded mmediato e poi F 
Finestra di digitazione. poi F6 per passare alla 


3: PTOseguite il controllo del loop FOR spostando il cursore sulla riga conte- 
di ; enunciato END SUB (l'ultima riga del sottoprogramma); selezio- 

1 comando Punto di interruzione (F9) per impostare un breakpoint 

È quesia riga, e poi selezionate il comando Analizza il flusso dal i 

x ua In questo modo è possibile vedere le rimanenti istruzioni del loop 

° a velocità rallentata. All’inizio del programma avevamo specificato 
e DA _- il «i dovrebbe essere eseguito due volte. Selezionate 
i Inua (F5) per eseguire il programma a velocità rallentata; 

e 1 esecuzione del loop verrà richiesto di inserire le informazioni. 


4. O) che la prima correzione abbia avuto effetto (il pro gramma ha fat- 
ea aa =. di al breakpoint senza errori). Selezionate il co- 
se Hi eruzione (P9) per togliere il breakpoint e il comando 

per eseguire il programma a velocità normale. 


Ricerca del secondo bug 
Dobbiamo trovare ancora un bug all’interno del nostro programma. 


1. 
Premete F8 una volta per tornare nel programma principale e sette altre 


ica per visualizzare alcuni enunciati PRINT e i contenuti della matrice 
orte$, che sono stati trasferiti dal sottoprogramma RiceviDati 


2. Premete F4 per visualizzare l’attuale schermo di output: tutti gli ele i 
sono corretti! Si noti che lo schermo di output sta iu SORA 
De i di dei messaggi di debug e del continuo riavviamento del a 
gramma, non c è nulla di cui preoccuparsi perché tutto ciò non apparirà 


nella versione finale del 
programma. Premete un tasto lasi 
nare nella Finestra Immediato. e PANE 


Premete F8 sette altre volte per eseguire gli enunciati che mostrano il cal 
colo finale delle calorie e terminano il programma. Premete F4 er i i 
re 1 risultati: il calcolo delle calorie è completamente sbagliato ne he n 
può essere utile usare un enunciato PRINT per controllare la variabile i 


lorie%. Premete infin CHO 
i e un tasto qualsiasi per t sio: 
gitazione. q per tornare nella Finestra di di- 
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4. Spostatevi nella Finestra Immediato, cambiate l’enunciato di debug in 
questo modo e premete Invio. 


COLOR 4: PRINT "DEBUG: totaleCalorie% ="; totaleCalorie%: COLOR 7 


L’enunciato PRINT mostra l’ultimo valore del calcolo delle calorie inse- 
rite. Cosa succede? Non sarebbe stato compito del sottoprogramma Ricevi- 
Dati tenere un totale aggiornato del valore delle calorie? 


Isolamento del secondo errore logico 


Torniamo nel sottoprogramma RiceviDati per trovare la fonte dell’errore. 
Una prima cosa da fare è controllare che non vi siano errori ortografici (il no- 
me di una variabile potrebbe essere stato scritto male); tornate nella Finestra 
di digitazione e usate il comando Trova dal menu Cerca per cercare la varia- 
bile totaleCalorie% (si noti che il comando trova è molto utile quando si la- 
vora su programmi di grandi dimensioni). Il comando Trova individua la 
variabile totaleCalorie% nella lista dei parametri del sottoprogramma Ricevi- 
Dati; selezionate il comando Repti trova dal menu Cerca (F3) più volte fino a 
completare la ricerca: totaleCalorie% appare sei volte (tre delle quali nel sot- 
toprogramma). 

Si può concludere che non vi è un errore di ortografia. Passiamo allora a 
controllare l’enunciato nel sottoprogramma RiceviDati che contiene il totale 
aggiornato delle calorie inserite dall’utente; premete F2 e selezionate Ricevi- 
Dati per effettuare delle modifiche. Esaminate l’enunciato di assegnazione al- 


la fine del loop FOR: 
totaleCalorie% = calorie% 


Quest’enunciato aggiorna in modo appropriato totaleCalorie% per tenere 
un totale aggiornato? 


Correzione del secondo errore logico 


La risposta è no! Come abbiamo visto nei capitoli precedenti, per tenere ag- 
giornato un totale è necessario sommare il totale corrente e il successivo valo- 
re aggiunto oppure leggere e poi assegnare al totale corrente. La modifica da 
apportare per correggere questo errore è la seguente: 


totaleCalorie% = totaleCalorie% + calorie% 


313 


IL LIBRO DEL QBASIC MS-DOS 


or volta apportati questi cambiamenti il programma potrà essere ese- 
guito con successo. Controllatelo nuovamente dall’inizio alla fine per assicu- 
rarvi che sia completamente libero da bug. 


Come evitare i bug 


Do 
| Pi Li visto come controllare e correggere bug, vediamo ora alcuni sug- 
g enti in grado di aiutarvi a ridurre il rischio di errori nei programmi 


Pianificare attentamente 


i 2 a scrivere un programma assicuratevi di sapere che cosa vo- 
I a è come pensate di scriverlo in QBasic. Pensate ai vari algorit- 
mi che il programma userà, come l’input e l’output verranno organizzati e 
come i dati verranno conservati e manipolati. Cominciate in modo sempli 
affrontate gli aspetti complessi del programma in una seconda fase IR 


Lavorare un passo alla volta 


Non cerc i scri 
ate di scrivere un programma tutto in una volta ma createlo e con- 


trollatelo un pezzo alla volta; i ioni di 
a; 1solate funzioni diverse in m 
Lia odo da : 
programmi e funzioni appropriate. SERA 


Eseguire spesso il programma 


ERA i i 
Quando fate un cambiamento, eseguite il programma per assicurarvi che fun- 


zioni. In questo modo pot: PE 

ete cogliere semplici ri di 
. eITO 
anticipo. p di programmazione in 


Provare nuove idee nella Finestra Immediato 


Usate la Finestra Immedi 
ato per controllare parti di na . 
nel programma. parti di codice prima di inserirle 


Controllare il programma rigorosamente 


Con 
trollate il programma in ogni sua parte e imparate a conoscere come ri- 


sponderà Pai qualsiasi tipo di 1 np 7 I i | ) CI e a € t € { Ie ) 7, ( ) 
ut; S ond 1 
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sm Qualèilnumeroo la stringa più grande che il programma è in grado di 
gestire? 


a Qualèil più piccolo? 
Cosa può causare l’interruzione del programma? 


Bs Comesipuòevitare che un utente provochi un’interruzione del program- 


ma? 


8 L’utentesaràin grado di capire cosa fa il programma? 


SOMMARIO 

In questo capitolo abbiamo visto molti strumenti e tecniche di debug. Oggi vi 
sono molti strumenti disponibili per i programmatori e molti di questi sono 
disponibili in QBasic; ma a un programmatore non bastano gli strumenti per 
fare il debug dei suoi programmi (e peggio ancora di quelli di altri) ma è ne- 
cessaria abitudine e abilità a pensare in modo logico e creativo, esaminando 
l’esecuzione dei programmi in tutti i suoi momenti. Evidentemente più si co- 
noscono QBasic e le sue regole di sintassi, più facile sarà individuare gli erro- 
ri di programmazione e trovare soluzioni adeguate. 


DOMANDI ED ESERCIZI 
1. Quali passi si dovrebbero seguire per isolare un bug in un programma? 


2. Qualè la differenza tra un errore di sintassi e un errore run-time? 


3. Se poteste disporre di soli due comandi del menu Debug, quali scegliere- 


ste? 
4. Cosafailtasto funzione F7? 
5. Qualèlo scopo del comando Imposta istruzione successiva? 
6. Che tipo di errore logico è più difficile da individuare e correggere? 


7. Il programma (ORSO.BAS), nella pagina successiva contiene due errori 
di sintassi; scrivetelo, trovate gli errori e correggeteli. 
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8. Il programma ERNOMI.BAS contiene due errori logici. Scrivete il pro- 
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gramma e usate gli strumenti visti in questo capitolo per corre ggeli. 


DESTIO: RSA GRANO SAONA 


PRI SIRTISTO REAPER RIAISSAE SIAT CRRIABRIG PARTENARIATI RE RZIERITAROSE 


PARORSTARI A ROSS SA RARISERERAARIA SEEREIEO 


PERE AIZEIERAZERZIAR PVIRZATAA DEIRA SISI SISESRS 


Approfondire 


la conoscenza 
di QBasic 


CSAR REISER SIM 


IL LIBRO DEL QBASIC MS-DOS 


Congratulazioni! Avete completato questo libro che aveva lo scopo di intro 
durvi alla programmazione in QBasic fornendovi i primi strumenti per 4 
minciare a programmare. Speriamo che questo non sia che un punto di 
partenza verso un'esplorazione e una conoscenza ancor più approfondita di 
QBasic. In questo capitolo viene data una breve descrizione degli argomenti 
trattati in questo libro e un’introduzione ad alcune tematiche che meritano ul- 
teriori approfondimenti da parte di chi sia interessato a imparare QBasic più 
n profondità. Inoltre verrà data una breve descrizione del Microsoft dé 
Basic Compiler, una versione avanzata di QBasic, disponibile per chi si se 

ta pronto a fare un ulteriore salto qualitativo. i 


COSA AVETE IMPARATO 


Pensate per un attimo ai progressi che avete compiuto leggendo questo libro e 
seguendo gli esercizi via via proposti. Avete visto, tra le altre cose, come 
QBasic ragiona e come funziona un computer; avete appreso la struttura di un 
programma in QBasic e come crearne uno usando i comandi di menu. Avete 
imparato come conservare informazioni in un luogo per poi usarle in si altro 
e come ricevere un input dall’utente per poi usarlo nel programma. Avete vi- 
sto come programmare in modo efficiente, usando i loop per compiti ripetitivi 
e dichiarando costanti per valori che non cambiano mai; avete anche imparato 
a progettare un programma e a correggerlo quando qualcosa non va Infi 
avete atfrontato i problemi inerenti all’uso della grafica e del suono per a 
ferire ai vostri programmi un aspetto più piacevole e funzionale. Avete poi 
creato dei veri e propri programmi servendovi di tutte queste tecniche i 

| Nello sviluppare i vostri programmi non cercate di adottare sempre solu- 
zioni nuove, ma usate, quando potete, parti con funzionalità generale. Racco- 
gliete i listati di tutti i programmi che scrivete perché questi ! Osso 
rappresentare un'utile fonte di informazioni. | i 


COSA DOVETE APPROFONDIRE 


Le modalità di gestione di dati, input e output, e azioni ripetitive, viste in 

sto libro, rappresentano le fondamenta dei programmi che sanivareie in die 
ro. Ma ci sono molte altre cose che si possono imparare su QBasic e ve de 
accorgerete proprio lavorando con questo linguaggio; incontrerete situazioni 
che aprono tutta una serie di nuove domande: come lavora QBasic col mou- 
se? Come posso trarre vantaggio dalle funzionalità delle stampanti? Come 
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funzionano i file ad accesso casuale? Come posso usare QBasic insieme ad 
altri linguaggi di programmazione? 
Tutte queste domande trovano risposta nei moltissimi libri oggi in com- 


mercio. 


ALTRE VERSIONI DI BASIC 


MS-DOS QBasic non è il solo pacchetto per la programmazione in Basic del- 
la Microsoft Corporation. In termini di potenza rappresenta un prodotto di li- 
vello iniziale nella famiglia dei prodotti Microsoft. Se volete avventurarvi in 
prodotti più complessi non avete che l'imbarazzo della scelta. 


Microsoft QuickBasic Compiler 

Questa versione completa di MS-DOS QBasic contiene più di ventiquattro 
opzioni di menu che supportano debug di alto livello, gestione di file, proce- 
dure e programmazione modulare. Il maggior vantaggio di questo prodotto è 
che permette di creare librerie e file eseguibili stand-alone (autonomi), ren- 
dendolo concorrenziale con tutti gli altri pacchetti di programmazione avan- 
zata. QuickBasic Compiler è il passo più logico per chi voglia continuare a 
programmare in Basic. 


Microsoft QuickBasic per Apple Macintosh 


Questo compilatore QBasic è dedicato alla famiglia di personal computer Ap- 
ple Macintosh. Questa versione è simile a quella per personal computer MS- 
DOS ma è studiata per supportare l’ambiente operativo, basato su menu e 


finestre, proprio del Macintosh. 


Microsoft Basic Professional Development System 


È un compilatore avanzato per programmatori professionali. Include supporto 
per il sistema operativo 05/2 e per progetti di programmazione di grandi di- 
mensioni; comprende una copia del Microsoft QuickBasic Compiler. 
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MICROSOFT QUICKBASIC COMPILER I APPENDICE A 


MS-DOS QBasic è un prodotto completo e utile per imparare a programmare le—e—<«ea—=:=:1!;:;: ::°c:  -——'—_—NEIETI 
in Basic e per sviluppare semplici applicazioni. Se però avete bisogno di fun- 


® 
zionalità più complesse, potete orientarvi verso il Microsoft QuickBasic 
Compiler, che presenta molti vantaggi rispetto a QBasic: S O Cl i C i i u 
Ha la capacità di creare file eseguibili stand-alone (file con estensio- 
ne.EXE). 


e © 
Può creare librerie per procedure usate spesso. C delle OD Z, 1 Oni 


Dispone di tecniche avanzate di debug. 


Supporta programmi con più moduli. i ) o 
Permette un maggior controllo sull’ambiente di programmazione. | 1 a | S 1 C 


Contiene un numero maggiore di opzioni di menu. 


ERI CRRIRERREIIIREZE 
SOPRANA RIINA 


SIRIA CERRI TIE 2250 


Inoltre tutte queste funzionalità sono integrate nel tipico ambiente di pro- O 
grammazione di QBasic; in questo modo tutto ciò che avete imparato fino a | 
questo momento non va perduto. Inoltre, il linguaggio di programmazione 
Basic è identico in entrambi i prodotti, per cui tutti i programmi scritti in 
QBasic potranno essere eseguiti senza problemi. 


SOMMARIO 


In questo capitolo abbiamo evidenziato i concetti appresi fino ad ora. Ci au- 
guriamo che questo libro vi spinga a esplorare e a imparare ancor di più il lin- | 
guaggio Basic. Indipendentemente dalle ragioni che vi hanno spinto a 
comprare questo libro, le cose che avete imparato non potranno che servirvi. 
Avete fatto il primo passo in un nuovo mondo: andatene fieri! E program- 
mate, programmate, programmate! | 
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Questa appendice rappresenta una veloce guida di riferimento all'ambiente di 
programmazione di QBasic basato sull’uso dei menu. Gli aspetti che verran- 
no affrontati sono i seguenti: 


Selezione di menu e comandi. 

Uso di finestre di dialogo. 

Uso dei comandi di modifica da tastiera. 

Selezione di testo. 

Uso del sistema di aiuto on-line. 

Stampa dei programmi o di parte del sistema di aiuto. 


Cambiamento dei colori dello schermo. 


Uso delle opzioni di avvio. 


Per informazioni più approfondite si può sempre fare riferimento al siste- 
ma di aiuto on line di QBasic. 


SELEZIONE DI MENU E DI COMANDI 


In QBasic vi sono otto menu a scorrimento (detti anche a tendina) che con- 


tengono comandi per la gestione dei file, l’uso della guida, la modifica, l’ese-. 


cuzione e il debugging dei programmi. E possibile selezionare menu e 
comandi con il mouse o con la tastiera. 


Con il mouse... 


1. Posizionare il puntatore del mouse sul nome del menu da selezionare e 
fare clic con il pulsante sinistro per aprirlo. 


2. Spostare il puntatore sul comando desiderato e fare clic nuovamente con 
il pulsante sinistro. 


Con la tastiera... 


1. Premereiltasto Alt per attivare la barra dei menu. 
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2. Premere il tasto corrispondente alla prima lettera del nome del menu da 
selezionare. 


3. Usarei tasti di direzione per evidenziare il comando da eseguire e preme- 
re Invio (o semplicemente premere la lettera evidenziata nel nome del co- 
mando). 


USO DI FINESTRE DI DIALOGO 


Quando QBasic necessita di informazioni addizionali per un comando apre 
una finestra di dialogo. La figura A-1 mostra la finestra di dialogo che appare 
quando si seleziona il comando Apri dal menu File (si noti che i contenuti po- 
tranno essere diversi). 

Una tipica finestra di dialogo contiene vari campi: 


MG Modifica Visualizza Cerca Esegui Debug Opzioni 9 
Senza titolo It 
Apri 


(| None del file: [IBM CASELLADITESTO | 
| D:NMONDADORN@_BASICNLISTAPPE CASELLE DI 
File SCORRIMENTO Dir/Unità 


BANZAI . BAS FORME .BAS - 0RS02,BAS 
BENZINA .BAS  GIGI.BAS PAESE . BAS 
CALC. BAS INVERSO .BAS = STATI. BAS 
CANZONEZ.BAS MUOVICER.BAS SUONO.BAS 
CERCHIO.BAS = MUOVINIM.BAS 

DADI .BAS MOMEZ .BAS 

DIVIDI .BAS NOMI .BAS 

DOMAN 


PULSANTI DI COMANDO 


———_mwBARRE DI SCORRIMENTO 
<fmnulla> Guida? 


Fi=Guida Invio=Esegui Esc=Annulla Tab=Campo seg. . Freccia=Voce seg. 


Figura A-1. Gli elementi della finestra di dialogo Apri . 


mi  Caselleditesto per ricevere informazioni dalla tastiera, come il nome o 
il percorso di ricerca di un file. 


m Caselle a scorrimento perla selezione di un elemento (come il nome di 
un file, di una directory o un colore) tra diverse opzioni. Le barre di 
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scorrimento permettono di vedere anche quelle informazioni che non si 
trovano nelle caselle. 


Bi Caselle di controllo per indicare se un elemento è attivo o meno, attra- 
verso la presenza di una X tra parentesi quadre. 


E Pulsantiopzione sono gruppi di pulsanti tra cui è possibile effettuare una 
sola selezione. 


3 Pulsanti di comando per controllare l’operatività di una finestra di dia- 
logo. Questi possono essere usati per eseguire un comando, cancellarlo o 
ottenere l’aiuto in linea. 


I campi di una finestra di dialogo possono essere selezionati con il mouse 
o con la tastiera: 
Con il mouse... 
1. Fareclic sul campo da modificare. 


2. Digitare le informazioni (solo nelle caselle di testo) o fare clic sull’ele- 
mento desiderato. 


3. Fare clic sul pulsante OK per eseguire il comando, sul pulsante Annulla 
per cancellarlo o sul pulsante Guida per ottenere la guida on-line. 

Con la tastiera... 

1. Premere iltasto Tab per spostarsi all’interno della finestra di dialogo. 


2. Digitare le informazioni (solo nelle caselle di testo) o usare i tasti di dire- 
zione per selezionare l’elemento desiderato. 


3. Premere Invio per eseguire il comando o Esc per cancellarlo. 


I seguenti tasti possono essere usati all’interno di una finestra di dialogo: 
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Tasto(i) Funzione(i) 


Tab Sposta al campo successivo 

Maiusc-Tab Sposta al campo precedente 

Tasti di direzione Seleziona un elemento all’interno dell'elenco delle voci; 
seleziona un pulsante opzione; attiva\disattiva una casella 
di controllo 

Pagl/Pagl Scorre l’elenco delle voci di diversi elementi alla volta. 

Barra spaziatrice Attiva/disattiva una casella di controllo; esegue un 
pulsante di comando 

FI Mostra le istruzioni per il completamento di una finestra 
di dialogo 

Invio Esegue un comando 

Esc Cancella un comando 


385 


IL LIBRO DEL QBASIC MS-DOS Appendice A - Uso dei menu e delle opzioni di QBasic 


EQUIVALENTI DI TASTIERA Tastoli) Tasti WordStar Funzione 
DEI COMANDI DI MENU | Fine Ctri-QD Sposta all'ultimo caratiere nella riga 
QBasic fornisce scorciatoie di tastiera per la maggior parte dei comandi di Cirt-Invio Girl) Sposta all’inizio della riga successiva 
menu e per alcuni comandi che non si trovano all’interno di essi, come de CHnome UR 9 posta allinizio:0 Ala Piosscura 

| P DR EI ai Ctrl-Fine Ctrl-QG Sposta alla fine della procedura 
scritto nella seguente tabella. Ins Cirl-V Attiva/disattiva la modalità inserimento 
csc io cet Maiusc-Ins Nessuno Incolla i contenuti degli Appunti 
Tastoli) Funzione Menu/Comando Maiusc-Canc Nessuno Taglia il testo selezionato 

(Io pone negli Appunti) 
FI Mostra la guida specifica Guida/Argomento Nessuno Ctrl-Y Taglia la riga corrente 
Maiusc-F1 Mostra la guida generale Guida/Guida (la Polo negli Appunti) | 
F2 Mostra l'elenco delle procedure Visualizza/SUBs Nessuno Ctri-QY Taglia dal cursore alla fine della riga 
Maiusc-F2 Mostra la procedura successiva Nessuno (lo pone negli Appunti). | 
Ctrl-F2 Mostra la procedura precedente Nessuno Canc Ctrl-G Cancella il testo o il carattere selezionato 
F3 Trova la successiva stringa da cercare —Cerca/Ripeti trova i Nessuno Ctr-T Cancella la parola dalla posizione 
F4 Mostra lo schermo di output Visualizza/Schermo output JSlcursole sue 
F5 Continua l'esecuzione del programma Esegui/Continua Maiusc-Tab Nessuno Cancella un livello di rientro per le righe 
Maiusc-F5 Esegue un programma dall'inizio Esegui/Avvia selezionate 
F6 Attiva la finestra successiva Nessuno Ctrl-Ins Nessuno Copia il testo selezionato negli Appunti 
Maiusc-F6 Attiva la finestra precedente Nessuno PAGT Ctrl-R Scorre un pagina verso l'alto 
F7 Esegue il programma al cursore Nessuno PAGI Ctrl-C Scorre una pagina verso il basso 
E8 Esegue l’enunciato successivo Debug/Passo Ctrl-P Nessuno inserisce il carattere di controllo 
F9 Attiva/disattiva il breakpoint Debug/Punto di interruzione (digitate Ctri-P e poi il carattere di controllo 
F10 Esegue l’enunciato successivo desiderato) 
(salta la procedura) Debug/Procedura passo 
Ctrl-F10 Commuta da finestre a pieno schermo 
e finestre multiple Nessuno 
SELEZIONE DI TESTO 
| Selezione è il processo di evidenziazione di un blocco di testo con la tastiera o 

COMANDI DI TASTIERA PER LA MODIFICA col mouse; il testo selezionato può essere usato con molti comandi di QBasic, 


i CA » n alto NET inclusi i seguenti. 
Oltre ai comandi di modifica del menu Modifica, QBasic dispone di diversi = 


comandi di modifica da tastiera, molti dei quali hanno degli equivalenti in 


WordStar, come mostra questa tabella. Menu/Comando Tastoli) BUNZIONE 

Modifica/Taglia Maiusc-Canc Cancella il testo selezionato 
Tasto(i) Tasti WordStar Funzione (lo pone negli Appunti) 
/eZà|"|jj©i©z i «—A{‘‘+«+«£««à4]k]kk{{-+\ ).»\WK Modifica/Copia Ctrl-Ins Copia il testo selezionato negli 
Da Ctrl-S Sposta un carattere a sinistra Appunti 
> Ctrl-D Sposta un carattere a destra Modifica/Incolla Maiusc-Ins Incolla i contenuti degli Appunti 
Ctrl-— Ctrl-A Sposta una parola a sinistra | File/Stampa Nessuno Stampa il testo selezionato 
Ctrl Ctrl-F Sposta una parola a destra Cerca/Trova Nessuno Cerca il testo selezionato 
Ctrl-E Sposta una riga in su | Cerca/Cambia Nessuno Cerca e cambia il testo selezionato 
Ctrl-X Sposta una riga in giù | Modifica/New SUB Nessuno Usa il testo selezionato come nome 
Home Ctrl-QS Sposta al primo carattere della riga per un nuovo sottoprogramma 
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Menu/Comando 


Funzione 


Modifica/Nuova FUNCTION Nessuno Usa il testo selezionato come nome 
per una nuova funzione 


NOTA: Fate molta attenzione quando lavorate con testo 
selezionato perché se digitate un carattere (anche uno 
spazio) mentre una riga di testo è selezionata questa vie- 
ne sostituita (e persa definitivamente). Per cancellare una selezione 
(cioè per “deselezionarla” ) basta fare clic col pulsante sinistro del 
mouse 0 premere un tasto di direzione. 


La selezione del testo può avvenire sia con il mouse che con la tastiera. 


Con il mouse... 


1. Posizionate il puntatore sul primo carattere da selezionare (esso dipende 
dalla direzione in cui spostate il mouse — si veda la tabella successiva). 


2. Tenere premuto il tasto sinistro del mouse. 
3. Spostare il puntatore all’ultimo carattere da selezionare. 
4. Rilasciate il pulsante del mouse. 


Gli spostamenti del mouse producono i seguenti effetti al momento della 
selezione di testo: 


 ——__————_ ____________———— 


Spostamento Effetto 
_—__ —_T 1 ll ‘00° 
Doppio clic Seleziona la parola su cui è posizionato il puntatore 
del mouse 
A destra di una colonna Seleziona il carattere su cui è posizionato il puntatore 
del mouse 
A sinistra di una colonna Seleziona il carattere a sinistra del puntatore del mouse 
Su di una riga Seleziona la riga su cui è posizionato il puntatore e quella 
"x o . sopra” 
Giù di una riga Seleziona la riga su cui è posizionato il puntatore e quella 
sotto 


 I#III IT ‘OO MM‘M‘RZBz&M UT” “Ni 


. Se il puntatore si trova nella prima colonna viene selezionata solo la riga superiore al punto d'inizio 
* D ia . La pi . . ° 
Se il puntatore si trova nella prima colonna viene selezionata solo la ri ga contenente il punto di inizio. 
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Con la tastiera... 


1. Usareitasti di direzione per spostare il cursore sul primo carattere da se- 
lezionare. 


2. Tenere premuto il tasto Maiusc. 


3. Usare i tasti di direzione per spostare il cursore sull’ultimo carattere da 
selezionare. 


4. Rilasciare il tasto Matusc. 


I tasti di direzione producono i seguenti effetti al momento della selezio- 
ne di testo: 


Tasto(i) Effetto 


di direzione 
> Seleziona il carattere su cui si trova il cursore 
<- Seleziona il carattere alla sinistra del cursore 
Seleziona la riga su cui si trova il cursore e quella sopra* 
Seleziona la riga su cui si trova il cursore e quella sotto** 
Pagf Seleziona la riga su cui si trova il cursore e tutta la schermata superiore 
Pagl Seleziona la riga su cui si trova il cursore e tutta la schermata inferiore 
Home Seleziona dal carattere alla sinistra del cursore all’inizio di riga 
Fine Seleziona dal cursore alla fine della riga 
Ctri-Home Seleziona dalla riga del cursore all’inizio della procedura 
Ctrl-Fine Seleziona dalla riga del cursore alla fine della procedura 


* Se il cursore inizia nella prima colonna viene selezionata solo la riga superiore al punto d’ inizio. 
** Se il cursore inizia nella prima colonna viene selezionata solo la riga contenente il punto di inizio. 


UTILIZZO DELLA GUIDA 


QBasic dispone di una documentazione in linea per parole chiave e altri ele- 
menti del linguaggio, per comandi, messaggi di errore e altri argomenti di 
programmazione. La guida in linea può essere attivata in tre modi: 


8 Per aspetti specifici basta porre il cursore sull’elemento (parole chiave 
etc.) per il quale si vuole aprire la documentazione e premere il tasto FI. 
Se si usa il mouse basta posizionare il puntatore sull’elemento e fare clic 
con il pulsante destro. 
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Bi Per un comando di menu o un messaggio di errore basta premere FI 
quando il comando è evidenziato o quando il messaggio appare sullo 
schermo. 


8 Perargomenti generali di programmazione basta premere Alt-H per apri- 
re il menu Guida e poi scegliere uno dei seguenti comandi: 


DO Indice per vedere un elenco alfabetico di parole chiave e altri argo- 
menti su QBasic 


DO Sommario per vedere una lista di argomenti generali di program- 
mazione come l’uso di QBasic, gli elementi del linguaggio e le infor- 
mazioni tecniche 


DO Argomenti per vedere la documentazione in linea della parola chiave 
su cui si trova il cursore 


DO Informazioni su per avere informazioni sul sistema di aiuto in linea 
di QBasic. 


La guida di QBasic è fatta di elementi interconnessi; ogni finestra di dia- 
logo contiene collegamenti in ipertesto che rimandano ad altri argomenti del- 
la guida. Per selezionare uno di questi collegamenti con il mouse, basta fare 
doppio clic su di esso; con la tastiera, premere Tab per posizionare il cursore 
su di esso e poi premere Invio. 

Se il testo della finestra di Guida è troppo esteso per essere visualizzato 
completamente, si possono usare 1 tasti Pagl e PagT per scorrerlo. Per alter- 
nare tra la Guida, la Finestra di digitazione e la Finestra Immediato si usa il 
tasto F6. 

Per uscire dalla Guida basta premere Esc. 


NOTA: Se il vostro computer emette un suono quando 
premete FI vuol dire che non esiste alcuna documenta- 
zione per la parola su cui il cursore si trova. 


Copia di programmi dal sistema di guida 


Copiare gli esempi di codice presenti nella guida all’interno dei vostri pro- 
grammi è molto semplice: 


1. Selezionare il codice da copiare. 


2. Scegliere Copia dal menu Modifica. 
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3. Premere Esc per chiudere la finestra della Guida. 
4. Spostare il cursore dove si intende copiare il codice. 


5. Selezionare Incolla dal menu Modifica. 


STAMPA 


Se si dispone di una stampante è possibile copiare in tutto o in parte 1 pro- 
grammi creati con il comando Stampa dal menu File. 


1. Selezionare il comando Stampa, che apre la seguente finestra di dialogo: 


Dit Modifica Visualizza Cerca Esegui Debug Opzioni i 
CRANZAI.BAS Il 


BANZAI. BAS 

Questo programma usa una matrice stringa dinamica 
monodimenzionale per conservare 

i nomi dei personaggi del file "Le avventure di Banzai". 


LI" = a 


OPTION BASE 1 ‘i Stampa 
ICLS 
! ) Solo testo selezionato 

) Finestra corrente ile 
) Programma intero 


(PRINT "=#* Questo pr| 
(PRINT "’Le avventur 
PRINT 


® 


{ 
{ 
{ 


Fox <Annulla> «Guida> 
DIM personaggiS nom 


PRINT ’ riempie la matrice dinamica 
FOR ix = i TO nomiz 

I INPUT " Nome: ", personaggiS(iz) 
«È 


_ Freccia=Voce seg. 


Fi=Guida Imvio=Esegui Esc=Ammulla Tab=Campo seg. _ 


2. Selezionare l’opzione desiderata: 


Dm Solotesto selezionato stampa solo il testo selezionato (per usare que- 
sta opzione è necessario selezionare prima il testo che si vuole stam- 
pare). 


DO Finestra corrente stampa solo i contenuti della finestra attiva (ciò è 
utile se si vuole stampare il programma principale, una procedura o i 
contenuti della Finestra Immediato. 
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O Programma intero stampa l’intero programma (compresi i sottopro- 
grammi e le funzioni). 


3. Premere Invio o fare clic su OK per eseguire il comando Stampa. 


Stampa di parti del sistema di guida 


È anche possibile usare il comando Stampa per stampare sezioni della Guida 
in linea: 


1. Individuare all’interno della Guida le parti da stampare. 


2. Selezionare il comando Stampa che apre questa finestra di dialogo: 


_ WWE Hodifica Visualizza Cerca Fsegui Debug Opzioni 
GUIDA: Indice della Guida in linea di QBASIC 
4Sommariok «Indice» «Precedente 


iPer avere informazioni su una parola chiave di QBRASIC contenuta nell'elenco 
seguente, occorre! 
i. Premere il tasto corrispondente alla prima lettera della parola chiave. 
Z. Usare i tasti (3 Stampa sulla parola chiave, 
3. Premere Fi per - a della Guida. 
{ ) Solo testo selezionato 
(+) Finestra corrente 


ABS funzione 


ABSOLUTE parola cl _. 
ACCESS parola chi WD <Annulla> {Guida> 
AND operatore 


ANY parola chiave 


BASE parola chiave BLOARD istruzione 
BANZAI .BAS 


! BANZAI .BAS 


Immediato 
Fi=Gu ida Invio=Esegui —Esc=Annulla Tab=Campo seg. Freccia=Voce seg. 


3. Selezionare l’opzione desiderata: 


O Solo testo selezionato stampa solo il testo selezionato (per usare 
questa opzione è necessario selezionare prima il testo che si vuole 
stampare). 


O Finestra corrente stampa un’intera voce della Guida. 


4. Premere Invio o fare clic su OK per eseguire il comando Stampa. 
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CAMBIAMENTO DEI COLORI 
DELLO SCHERMO 


QBasic permette di cambiare i colori dello sfondo e quelli in primo piano e di 
modificare altre caratteristiche dell'ambiente di programmazione per ade- 
guarle alle preferenze personali. L’adattatore video e il monitor a disposizio- 
ne determinano 1 colori utilizzabili. 


1. Selezionate il comando Schermo dal menu Opzioni. La figura A-2 mo- 
stra la finestra di dialogo di questo comando; essa permette di cambiare 1 
colori di fondo e di primo piano per tre elementi di testo sullo schermo: 


n Testo normale per cambiare i colori del testo regolare 


DM Istruzione corrente per cambiare i colori dell’enunciato successivo 
che dev'essere eseguito 


DM Righe punto interruz. per cambiare i colori delle righe di breakpoint 
impostate col comando Punto di interruzione dal menu Debug. 


Modifica Visualizza Cerca Esegui Debug [fat 
Schermo 
Colori 
Primo piano 


Testo normale î Grigio 
Blu _ Blu chiaro 


Wi Istruzione corrente Verde Verde chiaro 
Celeste Azzurro 
Righe punto interruz. Rosso Rosso chiaro 
Magenta Rosa 
Marrone # | Giallo 
Grigio chiaro ! [dk 


Opzioni schermo 
[xa Barre di scorrimento Punti di tabulazione: ® | 


<Ammulla> 


Fi=Guida Invio=Esegui Esc=fimnulla Tab=Campo seg. Freccia=Voce seg. 


Figura A-2. La finestra di dialogo del comando Schermo. 
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2. Selezionare gli elementi di testo a cui volete cambiare colore. 
3. Selezionare i colori per lo sfondo e per il primo piano. 
4. Premere Invio o fate clic su OK per eseguire il comando Schermo. 


NOTA: Se si scelgono dei colori diversi da quelli prede- 
finiti si evitino colori troppo accesi e contrasti troppo 
forti per non stancare la vista. 


La parte della finestra di dialogo intitolata Opzioni Schermo dà la possi- 
bilità di rimuovere le barre di scorrimento dallo schermo e di impostare la 
spaziatura delle tabulazioni. Togliendo le barre di scorrimento si ha la possi- 
bilità di vedere una parte più ampia del programma in una sola volta; impo- 
stando un valore per la spaziatura delle tabulazioni inferiore a 8 potete far 
stare una maggior quantità di codice sullo schermo e in stampa (ciò vale solo 
se siete abituati a rientrare le righe di codice). 


OPZIONI DI AVVIAMENTO 


QBasic è in grado di eseguire alcune funzioni direttamente al momento in cui 
viene avviato; per far ciò basta aggiungere delle informazioni addizionali (ri- 
ghe di comando) al comando di avviamento standard. Una lista parziale di 
queste righe di comando viene mostrata nella tabella seguente (per una lista 
completa potete fare riferimento all’aiuto in linea). 


Opzione Descrizione Esempio 


program QBasic carica il programma indicato gbasic reversi 
/run program QBasic carica ed esegue il programma 

indicato prima di mostrare il codice qbasic /run reversi 
/b Esegue QBasic in modalità bianco e nero gbasic /b 
/ed Esegue QBasic in modalità documento 

(identico al. programma MS-DOS EDIT) qbasic /ed 
/h Esegue QBasic con il massimo numero 

di righe per schermo ammesse dallo schermo 

(di solito 25, 43 0 50) gbasic /h 
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Le tabelle B-1 e B-2 mostrano i 256 caratteri disponibili sulla maggior parte 
dei personal computer basati su MS-DOS. La tabella B-1 mostra il set di ca- 
ratteri ASCII e la B-2 il set di caratteri estesi IBM. È possibile vedere la mag- 


Tabella B-2. // set di caratteri estesi IBM (codici 128-255) 


Carattere ASCII Carattere ASCII Carattere ASCII Carattere ASCII 


gior parte di questi caratteri con l’enunciato PRINT e confrontarle usando gli 
operatori relazionali di QBasic. Il capitolo 9 descrive le tecniche di visualiz- c 128 4 160 @ 192 , 294 
zazione e confronto in dettaglio. È 129 4 161 A 193 b 235 
Tabella B-1. // ser di caratteri ASCII (codici 0-127) - . - se A * 5 
4 31 ù 163 C 195 p 227 
à 132 à 164 D 196 ( 228 
Carattere ASCII Carattere ASCII Carattere ASCII Carattere ASCII i o È 3 - - . .. 
: c 135 2 167 G 199 t 231 
2 i 2 a - ì - è 136 è 168 H 200 FO 232 
© > s 34 - 66 % 9g é 137 nn 169 I 201 U 233 
Ò 3 s 35 c 67 È 99 a i n So ! - Ù i 
è 4 $ 36 D 68 d 100 î 192 - di 3 i d 29 
a s g 37 x 69 * 101 î 140 K 172 È 204 ì 236 
è 6 & 38 F 70 £ 102 , o ha i E Li > l 231 
o 7 i 39 z 7) 5 103 À 142 « 174 N 206 e 238 
DI 8 ( 40 H 72 h 104 3 n . de - 2 n 239 
O 9 ) 41 3 73 n 105 E 144 4 176 È 208 [ 240 
© 10 = 42 J 74 j 106 - 3 sl Lei Q 20, 6 2A1 
o t É 43 K 75 k 107 “ 150 - i > 210 i 2. 
O 12 Ì 44 n 6 1 108 6 147 3 179 S 211 < 243 
Ì 13 - 45 M 77 im 109 3 3a i Doo ti _- | Hut 
J 14 46 N 78 n 110 p A i 10) N cori J 27 
3% 15 7 47 0 79 o ti 2 20 Ù i o. sl 4 246 
> 16 0 48 P 80 p 112 s 9. i 1 d do 247 
Ù 17 1 49 0 8] 3 113 VÀ LS2Z 8 184 X 216 o 248 
"di 18 2 50 R 82 r 114 Ù D - 193 x Lui : 249 
I 19 3 SI S 83 n 115 Ù 154 186 Fé 218 i 250 
q 20 4 52 T 84 t 116 > 90 191 | A vo 251 
S 21 5 53 Ù 85 * 117 si n 5 n ì i h 252 
Y = 2 253 
s 2 ss E fs + ù SEI 
; 24 8 56 x 88 x 120. Î 3 : HA - 22) 255 
I 25 9 57 Y 89 y 121 
- 26 î 
297 - i P i 1 he Alcuni caratteri ASCII (da 0 a 32 o 127) vengono detti caratteri di controllo. 
_ 28 < 60 \ 92 i 124 Essi possono essere usati per eseguire compiti speciali, come l'avanzamento 
- 29 = 61 ] 93 } 125 della carta nella stampante. La tabella B-3 elenca i caratteri di controllo usati 
a 30 2 62 i 94 > 126 più di frequente. 
v 31 (i; 63 95 (dì 127 
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Tabella B-3. Caratteri di controllo ASCII più usati 


Carattere di controllo 


Codice ASCII 
7 Campana 
8 Backspace 
9 Tab 
10 Alimentaz. riga 
12 Alimentaz. carta 
13 Ritorno unitario 
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Descrizione 


Suona il bip del computer 

Fa retrocedere di una posizione 

un carattere sullo schermo 

Sposta a destra di una tabulazione 
Avanza la stampante di una riga 
Avanza la stampante di una pagina 
Avanza il cursore alla riga 
successiva 


e funzioni 
di QBasic 


TRA "Oa TRIIILERIIZIZISA CITI NIICISIZIEI RA LETIIIESIIIATITZZII 
SETE III TANNINI RINVII NAZ RIIZRIAI RS 
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In questa appendice potete trovare il nome di tutte le funzioni e gli enunciati 
disponibili in QBasic. Per vedere una documentazione completa su ciascuno 
di questi elementi si può fare riferimento all’aiuto in linea. 


AFFERMAZIONI 

BEEP DO...LOOP 
BLOAD DRAW 
BSAVE END 

CALL ENVIRON 
CALL ABSOLUTE ERASE 
CHAIN ERROR 
CHDIR EXIT 
CIRCLE FIELD 
CLEAR FILES 
CLOSE FOR...NEXT 
CLS FUNCTION 
COLOR GET 

COM GOSUB 
COMMON GOTO 
CONST IF...THEN...ELSE 
DATA INPUT 
DATE$ INPUTSNO 
DECLARE IOCTL 

DEF KEY 
DEFDBL KILL 
DEFINT LET 
DEFLNG LINE 
DEFSNG LINE INPUT 
DEFSTR LINE INPUT$NO 
DIM LOCATE 
RANDOMIZE SEEK 
READ SELECT CASE 
REDIM SHARED 
REM SHELL 
RESET SLEEP 
RESTORE SOUND 
RESUME STATIC 
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LOCK... UNLOCK 
LPRINT 
LPRINT USING 
LSET 

MID$ 

MKDIR 
NAME 

ON ERROR 
ON 

OPEN 
OPTION BASE 
OUT 

PAINT 
PALETTE 
PCOPY 

PEN 

PLAY 

PMAP 

POKE 

PRESET 
PRINT 

PRINT USING 
PRINT$NO USING 
PSET 

PUT 

TIME$ 

TIMER 
TROFFE 

TRON 

TYPE 
UNLOCK 
VIEW 


RETURN 
RMDIR 
RSET 
RUN 
SCREEN 


FUNZIONI 


ABS 

ASC 
ATN 
CDBL 
CHR$ 
CINT 
CLNG 
COS 
CSNG 
CSRLIN 
CVD 
CVDMBE 
CVI 

CVL 
CVS 
CVSMBE 
MKL$ 
MKSMBF$ 
MKS$ 
OCT$ 
PEEBK 
PEN 
POINT 
POS 
RIGHT$ 
RND 
RTRIM$ 
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STOP 
STRIG 
SUB 
SWAP 
SYSTEM 


DATE$ 
ENVIRON$ 
EOF 
ERDEV 
ERDEV$ 
ERL 

ERR 

EXP 
FILEATTR 
FIX 

FRE 
FREEFILE 
HEX$ 
INKEY$ 
INP 
INPUT$ 
SCREEN 
SEEK 
SGN 

SIN 
SPACES 
SPC 

SQR 
STICK 
STR$ 
STRIG 
STRING$ 


WAIT 
WHILE...WEND 
WIDTH 
WINDOW 
WRITE 


INSTR 
INT 
IOCTL$ 
LBOUND 
LCASE$ 
LEFT$ 
LEN 

LOC 

LOF 

LOG 
LPOS 
LTRIM$ 
MID$ 
MKDMBF$ 
MKD$ 
MKI$ 
TAB 

TAN 
TIME$ 
UBOUND 
UCASE$ 
VAL 
VARPTR 
VARPTR$ 
VARSEG 
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In questa appendice vengono descritte le differenze tra il linguaggio di pro- 
grammazione GW-Basic, fornito con le precedenti versioni di MS-DOS, e 
QBasic, fornito con la versione 5 di MS-DOS. In particolare cercheremo di 
dare dei suggerimenti sulla conversione dei programmi in GW-Basic per po- 
ter essere eseguiti sotto MS-DOS QBasic. Si può subito notare che QBasic è 
sostanzialmente compatibile con GW-Basic per cui la maggior parte dei pro- 
grammi in GW-Basic possono essere eseguiti sotto QBasic senza alcuna mo- 
difica. A volte, tuttavia, può essere necessario apportare alcune modifiche 
affinché 1 programmi vengano eseguiti correttamente. 


VERSIONI PRECEDENTI DI QBASIC 


Nell’industria dei personal computer c’è sempre stata la tradizione di distri- 
buire una versione di Basic assieme a MS-DOS; la ragione sta nel fatto che 
sin dalle origini si era capito che non sempre i prodotti software in commer- 
cio avrebbero soddisfatto le esigenze degli utenti e che di tanto in tanto questi 
avrebbero avuto necessità di scrivere i propri programmi. 

I limiti strutturali dei primi PC si riflettevano sulle prime versioni di Ba- 
sic con essi distribuiti (BASIC, GW-BASIC, BASICA): queste dovevano in- 
fatti essere versioni ridotte e compatte del linguaggio. Nel tempo però Basic 
si è evoluto in un ambiente di programmazione che supporta funzionalità 
molto avanzate proprie dei linguaggi di programmazione professionali, e ca- 
pacità di modifica proprie di potenti elaboratori di testo. QBasic contiene 
quasi tutte le funzionalità del più potente Microsoft QuickBasic Compiler (11 
più venduto linguaggio di programmazione di Microsoft) ma mantiene la 
compatibilità con versioni di Basic precedenti. 


NOTA: Le versioni di Basic distribuite con i PC nell’ ar- 
co di diversi anni hanno sempre contenuto delle modifi- 
che e dei miglioramenti. Per semplicità indicheremo 
tutte le versioni di Basic distribuite con MS-DOS prima della versio- 
ne GW-BASIC di MS-DOS 5. Per vedere più in dettaglio le differen- 
ze tra la vostra versione di Basic e QBasic fate riferimento alla 
documentazione del vostro linguaggio. 
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ESECUZIONE DI PROGRAMMI 


GW-BASIC IN QBASIC 


Per eseguire un programma scritto in GW-BASIC sotto QBasic basta salvare 
il programma in formato ASCII, aprirlo dall’interno di QBasic ed eseguirlo. 
La maggior parte dei programmi in GW-BASIC non richiedono alcuna modi- 
fica per essere eseguiti in QBasic (noterete però che vengono eseguiti più ve- 
locemente in QBasic che in GW-BASIC). 

Se QBasic non è in grado di eseguire un programma scritto in GW-BA- 
SIC mostra un messaggio di errore di sintassi in una finestra di dialogo in 
prossimità del primo problema trovato. Se ciò accade sarà necessario modifi- 
care il codice del programma per adattarlo alle regole di QBasic. 
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Salvare un programma GW-BASIC in formato ASCII 


Tutti i programmi in QBasic devono essere salvati in formato ASCII (solo te- 
sto). Per definizione l’editor di GW-BASIC salva i programmi in uno specia- 
le formato compresso che QBasic non è in grado di leggere; per questa 
ragione è necessario salvarli in formato ASCII, nel modo seguente: 


1. Eseguire GW-BASIC (si ricordi che MS-DOS 5 non dispone di questo 


programma e perciò è necessario reperirlo in una precedente versione di 
MS-DOS). 


2. Usare il comando LOAD per caricare il programma che si vuole esegui- 
re. 


3. Usare il comando LIST per verificare i contenuti del programma. 


4. Usare il comando SAVE e l’opzione A per salvare il programma: per 
esempio, per salvare un programma dal nome test.BAS in formato ASCII 
basta digitare la seguente riga di comando in GW-BASIC: 


save "test.bas", a 


5. Uscire da GW-BASIC usando questa riga di comando: 


system 


La prima figura di pagina seguente mostra il processo di carico, visualiz- 
zazione, salvataggio e uscita sullo schermo di GW-BASIC 


Esecuzione di un programma GW-BASIC in QBasic 


Dopo aver salvato il programma in formato ASCII lo si può caricare ed 
eseguire in QBasic; per caricare il programma TEST.BAS si può digitare 
questa riga di comando al prompt di MS-DOS: 


C:\>qbasic test.bas 


| Otterrete un risultato simile a quello mostrato nella seconda figura di pa- 
gina seguente. 

Se il listato non è chiaro e contiene molti caratteri di controllo e caratteri 
del set IBM significa che il programma probabilmente non è in formato 
ASCII. In questo caso si deve uscire da QBasic e salvare il programma in for- 
mato ASCII, nel modo descritto in precedenza. 
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GU-BASIC 3.20 
(C) Copyright Microsoft 1983,19094,1985,1986 
69332 Butes free 


Ok 

LOAD'INTEREST.BAS" 

Ok 

LIST 

10 INPUT ‘PRINCIPAL Lit “, PRINCIPAL 
20 INPUT “ANNUAL INTEREST RATE(C)? “, ANNUALRATE 
30 INPUT "NUMBER OF MONTHS? "MONTHS 

49 MONTHRATE = ANNUALRATE/12 

56 FACTOR = (MONTHRATE/168)+1 

69 PRINT ‘THE COMPUNDING FACTOR IS "FACTOR 

Ta FOR N = 1 TO MONTHS 

89 PRINCIPAL = PRINCIPAL * FACTOR 

99 PRINT "AFTER MONTH "N" THE NEW PRINCIPAL IS Lit'PRINCIPAL 
100 NEXT N 


Ok 
SAVE “INTEREST.BAS",A 


Ok 
SYSTEM 


IL IST MMP2RUN= E LOAD" RIS AVE BESCONT= ES, “LETIB/TRONe BRE TROFF= EKEY BIMMSSCREEN 


File Modifica Visualizza Cerca Esegui Debug Opzioni î 
INTEREST. BAS It 
[10 INPUT "PRINCIPAL Lit ", PRINCIPAL 

20 INPUT “ANNUAL INTEREST RATEC)? ", ANNUALRATE 

(36 INPUT "NUMBER OF MONTHS? “, MONTHS 

48 MONTHRATE = ANNUALRATE / 12 

(59 FACTOR = (MONTHRATE “ 190) + i 

69 PRINT “THE COMPUNDING FACTOR IS ":; FACTOR 

79 FORN = 1 TO MONTHS 

|G6 PRINCIPAL = PRINCIPAL * FACTOR 

99 PRINT "AFTER MONTH ": N: " THE NEW PRINCIPAL IS Lit"; PRINCIPAL 

1608 NEXT N 


Immediato 


M_ B0061 001) 


<Maius+Fi=Guida><F6=Finestra}<FZ=Subs><F5-Esegui><F8-Passo) 
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Per eseguire il programma TEST.BAS si QBasic basta aprire il menu 
Esegui e scegliere Avvia; se il programma è pienamente compatibile do- 
vrebbe essere eseguito senza problemi. 


Cosa succede se non viene eseguito? 


Se il programma in GW-Basic contiene un errore di sintassi, l’esecuzione 
viene interrotta e appare un messaggio di errore che descrive la natura e il 
luogo del problema. Correggere un errore di sintassi può essere facile, ma 
spesso richiede una certa conoscenza del linguaggio e anche buone doti “in- 
vestigative”. Il miglior posto per ottenere informazioni è il sistema di aiuto in 
linea di QBasic che contiene informazioni dettagliate su ogni tipo di errore di 
sintassi e una completa documentazione per ogni elemento di QBasic. Per 
avere maggior informazioni su uno specifico errore di sintassi basta premere 
F1 al momento in cui esso appare sullo schermo. Una volta compresa la natu- 
ra del problema basta collocare il cursore sull’enunciato o funzione associata 
a quell’errore e premere nuovamente F1 per vedere la documentazione relati- 
va. Con tutte queste informazioni si dovrebbe essere in grado di capire come 
correggere l’errore ed eseguire il programma con successo. 


Correzione di errori tipici 


Sebbene il processo di conversione di un programma da GW-BASIC in QBa- 
sic possa sembrare più un’arte che una scienza ci sono alcuni problemi che 
possono ricorrere con una certa frequenza; in questa sezione cercheremo di 
vedere 1 più importanti. 


Errori generali di sintassi 


A volte l’errore di sintassi che impedisce al programma di essere eseguito è 
una semplice incompatibilità nella punteggiatura usata tra elementi di un 
enunciato (uso incompatibile di virgole, punti e virgola o Invio). Altre volte 
l’errore consiste in lievi differenze. tra la sintassi di GW-BASIC e quella leg- 
germente diversa di QBasic. Per correggere questi errori è molto utile fare ri- 
ferimento alla documentazione in linea e confrontarla attentamente con la 
sintassi dell’elemento di GW-BASIC che contiene l’errore in questione. 
Spesso la differenza di sintassi sarà evidente e sarà altrettanto chiaro quale 
apportare. 
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Ò Prima di (e ‘se. _. 
Si il programma che —- di convertire non è . stato o scritto dar voi (el 
| perciò non ‘sape e esatti: mente ‘come lav. ra) UÒ risultare molto più diffi . 


- di correggere e di incompatibilità S aveti i. di si . 


Gestione dei tipi di variabile 


Si noti che le dimensioni e i tipi di variabili, specialmente gli interi, variano 
tra le diverse versioni di Basic. Se QBasic trova dei problemi nel modo in cui 
le variabili vengono usate in un programma, farà apparire un messaggio di er- 
rore; questo messaggio appare, per esempio, se una variabile intera di tipo re- 
gular è troppo piccola per contenere il numero assegnatole: 


File Modifica Visualizza Cerca Esegui Debug Opzioni 
I Senza titolo 
- 620 » 408 


Querf low 


HOKM  <Guida> 


«É 


Immediato 


Fi=Guida Imvio@Esegui Esc=Annulla Tab=Campo seg.  Freccia-Voce seg. 
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Se ciò accade basta cambiare il tipo di variabile intera utilizzata. Per 
esempio, la seguente assegnazione di un valore intero a una variabile intera di 
tipo regular in un programma corretto in Hewlett-Packard (HP) BASIC crea 
un errore di “overflow” in QBasic: 


NUM% = 620*400 


Quando convertite un programma in QBasic sarà necessario cambiare il 
tipo di variabile per garantire uno spazio maggiore: 


NUM& = 620*400 


Quando cambiate una variabile ricordate di modificare il tipo adottato in 
tutto il programma (QBasic tiene separate variabili con lo stesso nome ma di 
diverso tipo). 


Impostazione della modalità schermo corretta 


Molti programmi in GW-BASIC, come vecchi giochi per computer, erano 
progettati per supportare modalità video speciali che non sono supportate da 
QBasic o dagli adattatori video oggi in commercio. Se eseguite un program- 
ma che ha una modalità video non supportata da QBasic o dal vostro adatta- 
tore video, otterrete il seguente messaggio di errore: 


File Modifica Visualizza Cerca Esegui Debug Opzioni î 
Senza titolo \tlu 


CLS 
INPUT "Modalità schermo (68-13): ", modeNum 
399% | modeNumx 


Chiamata di funzione non valida 


Rod <Guida> | 


Bi 


Immediato 


Fi=Guida Imvio=-Esegui Esc=Amnulla Tab=Campo seg. —Freccia=Voce seg. - 
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Per correggere questo problema bisogna fare in modo che il programma 
utilizzi una modalità supportata da QBasic e compatibile con l’adattatore vi- 
deo del vostro computer (si veda il capitolo 11 per avere maggiori informa- 
zioni sugli adattatori video e sull’enunciato SCREEN). Si noti che il 
programma in GW-BASIC contiene molti comandi grafici, può risultare 
quindi necessario convertire alcune coordinate dello schermo presenti nel 
programma per adattarle alla nuova modalità schermo. 


Come ottenere i colori desiderati 


I colori di sfondo e di primo piano disponibili in GW-BASIC e in QBasic di- 
pendono dagli enunciati PAINT, PALETTE, SCREEN e COLOR; gli inter- 
valli e i significati degli argomenti di questi enunciati sono cambiati con il 
passare degli anni e perciò alcuni programmi in GW-BASIC potrebbero mo- 
strare colori diversi quando eseguiti in QBasic. Consultate la documentazione 
on-line di QBasic su PAINT, PALETTE, SCREEN e COLOR per aggiornare 
il programma con i valori di colore desiderati. Si noti che con l’evoluzione 
degli schermi avvenuta in questi anni, valori di colore e modalità schermo ad- 
dizionali potranno essere disponibili al momento della conversione. 


Esecuzione troppo veloce 


Un problema comune a vecchi programmi in GW-BASIC (specialmente gio- 
chi) sta nel fatto che QBasic è in grado di eseguirli più velocemente. La velo- 
cità può essere un problema quando un’applicazione è stata disegnata per 
essere eseguita a una velocità stabilita; ciò è particolarmente vero per pro- 
grammi scritti in GW-BASIC, quando vengono eseguiti in QBasic, magari 
con macchine più potenti e veloci. 

Se si vuole rallentare un programma scritto per un vecchio computer e 
con il più lento GW-BASIC basta aggiungere uno o più loop temporali al 
programma. Un loop temporale è un loop FOR che si ripete molte volte in un 
programma senza avere alcun effetto tranne quello di far passare il tempo 
(per cui un loop temporale non fa altro che rallentare l’azione per dare all’u- 
tente il tempo di assimilare ciò che è accaduto sullo schermo). Un tipico loop 
temporale ha un valore di partenza di 1 e un alto valore finale: 


FOR 1% = 1 TO 2000 
NEXT 1% 


411 


IL LIBRO DEL QBASIC MS-DOS 


Durante il loop non accadrà nulla, ma al suo termine sarà trascorso un 
tempo sufficiente a rallentare, almeno un po’, le cose. 

Se si sceglie di usare un loop temporale è consigliabile porlo subito dopo 
la parte di codice che visualizza il risultato sullo schermo; trovare il tempo 
giusto può richiedere un certo tempo e più di un tentativo a seconda della ve- 
locità del computer e dell’effetto che si vuole ottenere dal loop. 


TRARRE VANTAGGIO DA QBASIC 


Eseguire dei programmi GW-BASIC in QBasic è solo un primo passo nel 
trarre vantaggio dall’uso di QBasic. In realtà QBasic dispone anche di molte 
funzionalità nuove e potenti che lo rendono non solo più semplice e veloce da 
imparare ma anche in grado di rendere i vostri programmi più facili da capire 
e da correggere in futuro. Le funzionalità elencate di seguito (non disponibili 
in GW-BASIC) sono state descritte nel corso dei precedenti capitoli e sono 
certamente in grado di rendere i vostri programmi più evoluti. 


Bi Tipi di variabili e costanti estese. QBasic supporta nomi di variabili 


lunghi 40 caratteri in qualsiasi combinazione di maiuscole e minuscole. 
QBasic supporta anche variabili intere di tipo long, variabili stringa a 
lunghezza fissa oltre a costanti numeriche e stringa (per maggior infor- 
mazioni su questi tipi di variabili e costanti si veda il capitolo 4). 


& Nuovestrutture decisionali. Gli enunciati IF multirighe sono una novità 


di QBasic e possono contenere un numero illimitato di clausole ELSEIF 


per aiutarvi a controllare il percorso delle funzioni del programma. L'’e- 
nunciato SELECT CASE rappresenta un nuovo tipo di ramificazione 
condizionale basato sul valore di una variabile (per maggiori informazio- 
ni su queste affermazioni si veda il capitolo 5). 


2 Loop migliori. Oltre al loop FOR QBasic supporta anche il loop DO, per 
l’esecuzione ripetuta di un blocco di codice fino al verificarsi di una certa 
condizione (per maggiori informazioni si veda il capitolo 6). 


8 Sottoprogrammi e funzioni definite dall’utente. QBasic supporta bloc- 
chi di codice multiriga (con variabili locali e indipendenti), detti sottopro- 
grammi e funzioni, che possono essere eseguiti molte volte senza dover 
essere riscritti. Questi sottoprogrammi e funzioni sostituiscono le routine 
GOSUB e le funzioni a riga singola DEF FN tipiche dei programmi in 
GW-BASIC (per maggiori informazioni si veda il capitolo 7). 
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& Miglioramenti dello stile e dell’ambiente. QBasic include un sistema 
interno di controllo della sintassi che avverte l’utente non appena questi 
commette un simile errore, aiutandolo così a organizzare i programmi e a 
renderli più semplici da leggere (per esempio evidenziando automa- 
ticamente in maiuscolo le parole chiave, rientrando i loop e garantendo 
coerenza nei nomi delle variabili). QBasic non richiede la numerazione di 
riga (come GW-BASIC); perciò si possono creare programmi più facili 
da leggere semplicemente in base a un’attenta pianificazione delle strut- 
ture, dei loop e delle procedure, senza bisogno di GOTO e GOSUB tipici 
di GW-BASIC (si veda il capitolo 2). 
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Questa appendice contiene le risposte alle domande e agli esercizi dei capitoli 


dal 2 al 12. 

CAPITOLO 2 

1. Digitare qbasic al prompt di sistema. 

2. Falso. 

3. La Finestra di digitazione contiene il programma ed è la finestra principa- 
le di QBasic. La Finestra Immediato permette di controllare le righe di 
programma prima di utilizzarle. 

4. Il comando Nuovo pulisce la Finestra di digitazione e prepara QBasic per 
un nuovo programma. Il comando Apri apre la relativa finestra di dialogo 
per caricare da disco un programma esistente. 

5. La Finestra di digitazione mostra il programma su cui si sta lavorando. 
Lo schermo di output mostra il risultato del programma al momento del- 
l’esecuzione. 

6. Il comando Taglia cancella un blocco di testo selezionato dalla Finestra 
di digitazione e lo pone negli Appunti. Il comando Copia pone una copia 
del blocco di testo selezionato negli Appunti senza rimuovere l’originale 
dalla Finestra di digitazione. 

7. Si può cancellare testo da un programma nei modi seguenti: 

O  Colcomando Taglia dal menu Visualizza (testo selezionato) 
DO Coltasto Canc (un singolo carattere o testo selezionato) 

O Coltasto Backspace (un singolo carattere) 

DO Conlacombinazione di tasti Ctrl-Y (una riga) 

8. Il cursore di inserimento aggiunge testo senza sovrascrivere i caratteri 
esistenti. Il cursore di sovrascrittura sostituisce i caratteri esistenti con 
quelli digitati. La differenza a video tra i due è che il cursore di inseri- 
mento è rappresentato da un simbolo di sottolineatura lampeggiante men- 
tre il cursore di sovrascrittura appare come un rettangolo lampeggiante. 
Per alternare l’uso dei due cursori si usa il tasto Ins. 

9. Otto. 
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10. I seguenti nomi di file non sono validi: 


Nome di file non valido 


Ragione 


NOMESTAMPA.BAS 


BLU+BLU.BAS 
BLU BLU. BAS 
ABC-E-DEF.BAS 


PROG[1].BAS 
1*PROG.BAS 


Troppo lungo (NOMESTAMPA.BAS è composto 
di 10 caratteri) 

Il carattere + non è ammesso 

Lo spazio non è ammesso 

Troppo lungo (ABC-E-DEF.BAS è composto 

di 9 caratteri) 

| caratteri /e /non sono ammessi 

Il carattere jolly * non è ammesso 


11. Selezionare Esci dal menu File per uscire da QBasic. Se il file è stato mo- 


dificato QBasic mostra una finestra di dialogo che contiene le seguenti 
opzioni: Si (salva il programma), No (scarta i cambiamenti non salvati), 
Annulla (ritorna in QBasic) e Guida (mostra la Guida on-line). 


CAPITOLO 3 


li. 


Un enunciato opera in modo diretto, producendo generalmente risultati 
ovvi o tangibili (per esempio mostra .un carattere sullo schermo). Una 
funzione generalmente svolge il suo lavoro dietro le quinte e restituisce 
un valore al programma che può essere usato come argomento per un 
enunciato. | 


BEEP — enunciato 
CLS — enunciato 
DATE$ — funzione 
PRINT — enunciato 
TIME$ — funzione 


Un elemento tra parentesi quadre è facoltativo. Il carattere | indica che si 
può scegliere solo uno dei valori tra parentesi. 


Un argomento è una parte di informazione fornita a un enunciato o a una 
funzione. 


Una stringa è una raccolta di caratteri (che può includere lettere, numeri e 
simboli) racchiusa tra virgolette. Un’espressione numerica è un numero o 
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una variabile numerica (0, come visto nel capitolo 4, una qualsiasi 
espressione che produce un risultato numerico). 


6. Irisultato dei due enunciati PRINT è lo stesso. 

7. Un punto e virgola o una virgola alla fine dell’enunciato PRINT fa sì che 
il risultato del successivo enunciato PRINT venga mostrato sulla stessa 
riga. Un punto e virgola fa sì che questo risultato appaia immediatamente 
dopo quello dell’enunciato PRINT corrente; una virgola fa sì che questo 
risultato appaia nella successiva area di stampa. 

CAPITOLO 4 

1. Intero di tipo regular, intero long, virgola mobile a precisione singola e 
virgola mobile a precisione doppia. Differiscono nel tipo e nella dimen- 
sione del numero che possono contenere e nei rispettivi di dichiarazione 
del tipo. 

2. Per riservare uno spazio per un segno meno nel caso in cui il numero sia 
stato o possa diventare negativo. 

3. È probabile che una virgola non ammessa sia apparsa all’interno di un 
numero. 

4. È stato assegnato alla variabile un numero al di fuori dell’intervallo am- 
messo per quel tipo di dati numerici. 

S. a. Intero regolare 
b. Virgola mobile a precisione singola 
c. Virgola mobile a precisione singola 
d. Virgola mobile a precisione doppia 
e. Intero regular o virgola mobile a precisione singola 
f. Virgola mobile a precisione singola 
g. Intero long 
h. Virgola mobile a precisione doppia 
i. Virgola mobile a precisione singola 

6. La normale divisione restituisce un risultato frazionale; la divisione intera 
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restituisce solo un intero, scartando il resto; la divisione con resto restitui- 
sce solo il resto. 


Appendice E - Soluzione alle domande e agli esercizi 


Esponenziale (#); moltiplicazione e divisione (*, /,\, MOD); addizione e 
sottrazione (+, -). 


300. 


Una possibile soluzione a questo problema è il programma CALC.BAS: 


10. Una possibile soluzione a questo problema è il programma CER- 


CHIO.BAS: 
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CAPITOLO 5 


È; 
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Un’espressione numerica usa operatori matematici e fornisce un risultato 
numerico. Un’espressione condizionale usa operatori condizionali e for- 
nisce un risultato del tipo Vero o Falso. 


b, c, f, 1,4. K. 
Vero. 


AND richiede che entrambe le condizioni siano vere affinché un’azione 
venga intrapresa; OR richiede che solo una condizione sia vera affinché 
un’azione venga intrapresa. 


ELSE permette di eseguire un blocco di enunciati quando un’espressione 
condizionale in un enunciato IF viene valutata come falsa. ELSE è l’op- 
posto di THEN. 


ELSEIF permette di valutare un’altra condizione dopo che una preceden- 
te affermazione IF o ELSEIF è stata valutata come falsa. La parola chia- 
ve THEN deve apparire sulla stessa riga di ELSEIF. 


Una possibile soluzione a questo problema è il programma DOMAN- 
DA.BAS: | 


10. 


Il. 
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. QBasic valuta l’espressione che appare dopo SELECT CASE e controlla 


la clausola CASE che segue per trovare un valore uguale. QBasic esegue 
le affermazioni che seguono la clausola CASE i cui valori sono uguali al- 
l’espressione nell’affermazione SELECT CASE. 


. CASE ELSE permette di specificare un blocco di enunciati che verranno 


eseguiti se tutte le condizioni CASE in un enunciato SELECT CASE so- 
no valutate come false. 


IF permette di usare un’espressione condizionale in un enunciato CASE. 
TO permette di specificare un intervallo di valori numerici in un enuncia- 
to CASE. 


Una possibile soluzione a questo problema è il programma STATI.BAS: 
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mos Minnesota sii &»&»Y/O: 
| Popolazione nel 1980: de 
- Capitale: St. bl _{_ 
Anno. di fondazione: du 


T'unr numero c. la fe 


CAPITOLO 6 


1. 
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La variabile di calcolo identifica il valore del loop (un intero tra i limiti di 
inizio e fine del loop). 


inizio e fine possono essere costanti , variabili o espressioni numeriche. I 
valori possono essere negativi, positivi o uguali a zero. 


4. 


L’enunciato SOUND fa sì che lo speaker del computer emetta una tonali- 
tà di una certa frequenza e durata. 


Un loop nidificato è un loop di tipo FOR, WHILE o DO all’interno di un 
altro loop di tipo FOR, WHILE o DO. 


Posizionare la condizione all’inizio del loop DO assicura che essa debba 
essere verificata prima che il loop venga eseguito. Posizionare la condi- 
zione alla fine assicura che le affermazioni nel loop vengano eseguite al- 
meno una volta. 


Usare un loop di tipo FOR quando si vuole eseguire un blocco di enun- 
ciati uno specifico numero di volte. Usare un loop di tipo WHILE o DO 
per eseguire un blocco di affermazioni basato sul valore di una condizio- 
ne. 


n 


. Una possibile soluzione a questo problema è il programma BENZI- 


NA.BAS. 
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- ENZINA.BAS 
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10. Una possibile soluzione a questo problema è il programma DADI.BAS. 


CAPITOLO 7 


1. Sonotuttidei vantaggi. 


2. Il nome del sottoprogramma ScriviNome$ contiene un carattere tipo di- 
chiarazione stringa ($). Questo è un errore (solo le funzioni vanno marca- 
te col tipo di dato che restituiranno). Una corretta affermazione SUB 


sarebbe la seguente: 


SUB ScriviNome (Nome$, Cognome$) 
3. F2. 
4. Il comando Procedura passo nel menu Debug (F10). 


5. COMMON SHARED totale% 
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6. Un sottoprogramma permette di eseguire vari compiti o di inviare un nu- 


mero di valori al programma principale. Una funzione permette di ese- 
guire un compito più piccolo e specifico e restituisce un solo valore al 
programma principale. 


Il sottoprogramma InfoAuto potrebbe assomigliare al seguente: 


SUB InfoAuto (marca$, modello$, anno%, coloreg) 


PRINT "Scrivete le informazioni sulla vostra macchina" 
PRINT 

INPUT " Produttore: ", marca$ 

INPUT " Modello: ", modello$ 

INPUT " Anno: ", anno% 

INPUT " Colore: ", colore$ 


END SUB 


Un’affermazione che chiama il sottoprogramma /InfoAuto potrebbe essere 
questa: 


InfoAuto marcaî, modello$, anno%, colore$ 


La funzione TrovaMaggiore% può essere scritta in questo modo: 


FUNCTION TrovaMaggiore% (int1%, int2%) 


IF (int1% >= int2%) THEN 
TrovaMaggiore% = int1% 


ELSE 
TrovaMaggiore% = int2% 
END IF 


END FUNCTION 


Un enunciato che chiama la funzione TrovaMaggiore% potrebbe essere 
questa: 


- 


PRINT "L'intero più grande è"; TrovaMaggiore%(primo%, secondo%) 


Una possibile soluzione a questo problema è il programma FOR- 
ME.BAS. 
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| ll. programma mostra una | sagoma riempita con un _b_’_’ ___ uu 
arattere scelto. _.- _ . er Forma. i (sinbolaf, scettat) | 
i ' Dichiara le costant i usate come ardomenti- per °° . IL 
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CAPITOLO 8 


1. Glienunciati READ per convenzione. 


2. DATA, READ e RESTORE sono più indicati per dati che ricadono in 
queste categorie: 


O Daticonosciutiin anticipo (prima dell’esecuzione del programma). 
DO Datiche appaiono sempre nello stesso ordine. 


D Dati che possono circolare ripetutamente, come i giorni della setti- 
mana. 


3. Una possibile soluzione a questo problema è il programma GIGI.BAS: 
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4. Falso. CAPITOLO 9 
5. DIM numeri!(99) Leva 
. Vero. 
6. Un indicatore di fine dati è i indi = : nà 
. ut Ra - 0 MO o una stringa che indicano che non 2. Falso. La dichiarazione corretta non ha il carattere di dichiarazione del ti- 
vi sono ulteriori informazioni in una lista. po $: 
7. Una possibile soluzione a questo problema è il programma BAN- DIM cognome AS STRING # 20 


ZAT.BAS: 
3. UNODUETRE 


4. a,b, c,d. 

5. Il valore 0 restituito da INSTR può significare: 
D cercastringanonè stato trovato in stringabase 
CI inizioè maggiore della lunghezza di stringabase 
O stringabasenoncontiene alcun carattere 

6. H 

da 


8. Una possibile soluzione a questo problema è il programma NOMI.BAS: 


ha 


9. Una possibile soluzione a questo problema è il programma INVER- 
SO.BAS: 


8. Unerrore Indice inferiore fuori dal limite è un tentativo del programma 
di far riferimento a un elemento non esistente in una matrice. 
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10. Una possibile soluzione a questo problema è il programma DIVIDI.BAS. 
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oNome” 


CAPITOLO 10 

1. OUTPUT cancella i contenuti del file esistente; APPEND li aggiunge al- 
la fine del file esistente. 

2. di: 

3. Falso. 

4. LINE INPUT# è più potente di INPUT# quando è necessario leggere da 
un file lunghe righe di dati stringa o righe contenente virgole. 

5. Un argomento letterale dell’enunciato SHELL dev'essere racchiuso tra 
virgolette. L’enunciato corretto è questo: 
SHELL "copy test.txt test2.txt" 

6. Stringa trovata! 

7. Una possibile soluzione a questo problema è il programma PAESE.BAS 
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8. Una possibile soluzione a questo problema è il programma ORDI- 
NA.BAS: 
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CAPITOLO 11° 


1. 
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Le due componenti sono l’adattatore video e lo schermo. L’adattatore vi- 
deo determina la modalità schermo, genera il testo e la grafica da visua- 
lizzare oltre ai colori. Lo schermo mostra semplicemente ciò che gli 
Viene inviato dall’adattatore. 


In modalità testo l’adattatore può visualizzare solo caratteri alfanumerici; 
in modalità grafica può visualizzare sia testo che forme grafiche (pixel, 
linee, riquadri, cerchi etc.). 


LOCATE permette di posizionare il cursore di testo sullo schermo di out- 
put. 


Una possibile soluzione a questo problema è il programma MUOVI- 


NOM.BAS. 
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SCREEN cambia la modalità dell’adattatore video e determina la risolu- 
zione dello schermo e (se possibile) il numero di colori che l’adattatore 
video può visualizzare. 


Gli enunciati PSET e PRESET impostano singoli pixel sullo schermo 
nelle posizioni specificate. PSET imposta i pixel nel colore di primo pia- 
no corrente; PRESET imposta i pixel nel colore corrente di sfondo. 


Le coordinate assolute sono calcolate usando come punto di inizio (0, 0), 
che corrisponde all’angolo in alto a sinistra dello schermo. Le coordinate 
relative usano l’ultimo punto definito come punto di inizio per il loro cal- 
colo. 


Vero, solo se si usano le opzioni B e F. 


Falso. 


. Una possibile soluzione a questo problema è il programma MUOVI- 
CER.BAS. 
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CAPITOLO 12 


1. a. Eseguire il programma. 


b. Osservare errori e punti critici in fase di esecuzione. 

c. Studiare le affermazioni che producono l’errore usando i listati, 
gli strumenti di programmazione e la vostra conoscenza della 
sintassi di QBasic. 

d. Correggere l’errore e provare il programma. 


2. Unerrore di sintassi è un errore di programmazione che viola le regole di 
QBasic. Un errore run-time è un errore che forza il programma a inter- 
rompersi inaspettatamente durante l’esecuzione. 


3. Non vi è una risposta corretta; noi preferiamo i comandi Step e Toggle 
Breakpoint. 


4. Il tasto funzione F7 esegue la riga corrente e quelle comprese tra la riga 
corrente e il cursore a piena velocità. 


5. Imposta istruzione successiva imposta la riga in cui si trova il cursore co- 
me riga da eseguire successivamente. 


6. Anche qui non c’è una risposta corretta; noi pensiamo che i peggiori sia- 
no gli errori logici provenienti da espressioni aritmetiche o condizionali 
sbagliate. 


7. DIM e NEXT non sono scritti correttamente; la versione corretta è la se- 
guente (ORSO.BAS): 
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L’enunciato INPUT dovrebbe essere un enunciato LINE INPUT per ge- 
stire la virgola nell’input dell’utente e l’espressione condizionale nell’e- 
nunciato IF dovrebbe usare un operatore maggiore di (>) invece di uno 
minore di (<). Questa è la versione corretta (NOME2.BAS): 
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